ETO Development Tools 4

home *** CD-ROM | disk | FTP | other *** search
/ ETO Development Tools 4 / ETO Development Tools 4.iso / Essentials / Developer Essentials May91 / SpInside Mac and Friends / Technical Notes Stack / Technical Notes Stack 4.0.1 next >
MacBinary | 1991-05-09 | 2.7 MB | [STAK/WILD]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`100%`	dexvert	HyperCard Stack `(archive/hypercard)`	idMeta	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	PageFocus Data `(other/pageFocusData)`	ext	Unsupported
`100%`	file	MacBinary II, inited, Fri Mar 24 06:10:31 1989, modified Thu May 9 07:46:47 1991, creator HyperCard, type HyperCard stack, 2236928 bytes "Technical Notes Stack 4.0.1" , at 0x222280 596980 bytes resource Atari DEGAS Elite bitmap 640 x 400 x 2, color palette 0000 0003 0000 0a97 0000 ...	default (weak)
`99%`	file	data	default
`74%`	TrID	Mac HyperCard stack (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[STAK]`
macFileCreator	`[WILD]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 1b 54 65 63 68 6e 69 | 63 61 6c 20 4e 6f 74 65 |..Techni|cal Note|
|00000010| 73 20 53 74 61 63 6b 20 | 34 2e 30 2e 31 00 00 00 |s Stack |4.0.1...|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 53 54 41 4b 57 49 4c | 44 01 00 00 00 00 00 00 |.STAKWIL|D.......|
|00000050| 00 00 00 00 22 22 00 00 | 09 1b f4 a0 4f d2 a7 a4 |....""..|....O...|
|00000060| 4e e7 27 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |N.'.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 78 31 00 00 |........|....x1..|
|00000080| 00 00 54 00 53 54 41 4b | ff ff ff ff 00 00 00 00 |..T.STAK|........|
|00000090| 00 00 00 0a 00 22 22 00 | 00 00 54 00 00 00 00 02 |....."".|..T.....|
|000000a0| 00 00 00 02 00 00 00 03 | 00 00 0a 97 00 00 01 35 |........|.......5|
|000000b0| 00 00 d4 d6 00 00 d7 cc | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 e7 1c 00 00 00 00 | 00 05 00 00 90 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 02 01 80 00 | 02 01 80 00 02 01 80 00 |........|........|
|000000f0| fc a1 7b 00 00 00 00 00 | 00 25 00 00 01 7b 02 00 |..{.....|.%...{..|
|00000100| 00 00 00 00 01 e0 02 80 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 ad b4 00 00 67 db | 00 00 00 00 00 00 00 00 |......g.|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 80 00 00 00 08 00 00 00 |........|........|
|00000350| 88 00 22 00 88 00 22 00 | 88 88 22 22 88 88 22 22 |.."...".|..""..""|
|00000360| 88 aa 22 aa 88 aa 22 aa | cc aa 33 aa cc aa 33 aa |.."...".|..3...3.|
|00000370| ee aa bb aa ee aa bb aa | ee bb bb ee ee bb bb ee |........|........|
|00000380| ff bb ff ee ff bb ff ee | ff bb ff ff ff bb ff ff |........|........|
|00000390| 80 10 02 20 01 08 40 04 | ff ff ff ff ff ff ff ff |... ..@.|........|
|000003a0| 88 22 88 22 88 22 88 22 | 11 22 44 88 11 22 44 88 |."."."."|."D.."D.|
|000003b0| c4 80 0c 68 43 02 30 26 | 77 77 77 77 77 77 77 77 |...hC.0&|wwwwwwww|
|000003c0| aa 00 aa 00 aa 00 aa 00 | 88 22 55 22 88 22 55 22 |........|."U"."U"|
|000003d0| 88 55 22 55 88 55 22 55 | 77 dd 77 dd 77 dd 77 dd |.U"U.U"U|w.w.w.w.|
|000003e0| 80 00 00 00 00 00 00 00 | aa 55 aa 55 aa 55 aa 55 |........|.U.U.U.U|
|000003f0| 03 84 48 30 0c 02 01 01 | 82 44 39 44 82 01 01 01 |..H0....|.D9D....|
|00000400| 88 14 22 41 88 41 22 14 | 80 80 41 3e 08 08 14 e3 |.."A.A".|..A>....|
|00000410| 22 04 8c 74 22 17 98 10 | be 80 88 08 eb 08 88 80 |"..t"...|........|
|00000420| 25 c8 32 89 64 24 4c 92 | a2 9c 41 be 2a c9 14 eb |%.2.d$L.|..A.*...|
|00000430| 40 a0 00 00 04 0a 00 00 | 80 40 20 00 02 04 08 00 |@.......|.@ .....|
|00000440| aa 00 80 00 88 00 80 00 | ff 80 80 80 80 80 80 80 |........|........|
|00000450| 08 1c 22 c1 80 01 02 04 | ff 80 80 80 ff 08 08 08 |..".....|........|
|00000460| f8 74 22 47 8f 17 22 71 | bf 00 bf bf b0 b0 b0 b0 |.t"G.."q|........|
|00000470| ff 7f be 5d a2 41 80 00 | fa f5 fa f5 a0 50 a0 50 |...].A..|.....P.P|
|00000480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000600| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000610| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000680| 2d 2d 20 4d 61 63 69 6e | 74 6f 73 68 20 54 65 63 |-- Macin|tosh Tec|
|00000690| 68 6e 69 63 61 6c 20 4e | 6f 74 65 73 20 53 74 61 |hnical N|otes Sta|
|000006a0| 63 6b 20 a5 20 44 4f 20 | 4e 4f 54 20 52 45 4d 4f |ck . DO |NOT REMO|
|000006b0| 56 45 20 54 48 49 53 20 | 4c 49 4e 45 0d 2d 2d 20 |VE THIS |LINE.-- |
|000006c0| 76 65 72 73 69 6f 6e 3a | 20 34 2e 30 2e 31 20 a5 |version:| 4.0.1 .|
|000006d0| 20 41 70 72 69 6c 20 31 | 39 39 31 0d 2d 2d 20 43 | April 1|991.-- C|
|000006e0| 6f 70 79 72 69 67 68 74 | 20 31 39 38 38 2d 31 39 |opyright| 1988-19|
|000006f0| 39 30 20 62 79 20 41 70 | 70 6c 65 20 43 6f 6d 70 |90 by Ap|ple Comp|
|00000700| 75 74 65 72 2c 20 49 6e | 63 2e 0d 2d 2d 20 41 6c |uter, In|c..-- Al|
|00000710| 6c 20 52 69 67 68 74 73 | 20 52 65 73 65 72 76 65 |l Rights| Reserve|
|00000720| 64 2e 0d 2d 2d 0d 2d 2d | 0d 2d 2d 20 46 55 4e 43 |d..--.--|.-- FUNC|
|00000730| 54 49 4f 4e 53 3a 20 70 | 72 69 6e 74 49 74 2c 20 |TIONS: p|rintIt, |
|00000740| 66 69 6e 64 58 52 45 46 | 2c 20 66 69 6e 64 54 65 |findXREF|, findTe|
|00000750| 63 68 4e 6f 74 65 0d 2d | 2d 0d 0d 6f 6e 20 70 72 |chNote.-|-..on pr|
|00000760| 65 66 65 72 65 6e 63 65 | 73 0d 6c 6f 63 6b 20 73 |eference|s.lock s|
|00000770| 63 72 65 65 6e 0d 70 75 | 73 68 20 63 61 72 64 0d |creen.pu|sh card.|
|00000780| 67 6f 20 63 61 72 64 20 | 69 64 20 38 32 31 33 33 |go card |id 82133|
|00000790| 0d 75 6e 6c 6f 63 6b 20 | 73 63 72 65 65 6e 0d 65 |.unlock |screen.e|
|000007a0| 6e 64 20 70 72 65 66 65 | 72 65 6e 63 65 73 0d 0d |nd prefe|rences..|
|000007b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007c0| 2d 0d 2d 2d 20 73 74 61 | 72 74 55 70 20 68 61 6e |-.-- sta|rtUp han|
|000007d0| 64 6c 65 72 0d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |dler.---|--------|
|000007e0| 2d 2d 2d 2d 2d 2d 0d 6f | 6e 20 73 74 61 72 74 55 |------.o|n startU|
|000007f0| 70 0d 67 6c 6f 62 61 6c | 20 73 74 61 72 74 75 70 |p.global| startup|
|00000800| 73 0d 61 64 64 20 31 20 | 74 6f 20 73 74 61 72 74 |s.add 1 |to start|
|00000810| 75 70 73 0d 69 66 20 73 | 74 61 72 74 75 70 73 20 |ups.if s|tartups |
|00000820| 3d 20 31 20 74 68 65 6e | 0d 73 65 6e 64 20 22 73 |= 1 then|.send "s|
|00000830| 74 61 72 74 55 70 22 20 | 74 6f 20 48 6f 6d 65 0d |tartUp" |to Home.|
|00000840| 65 6e 64 20 69 66 0d 65 | 6e 64 20 73 74 61 72 74 |end if.e|nd start|
|00000850| 55 70 0d 0d 2d 2d 20 62 | 65 67 69 6e 20 70 6a 66 |Up..-- b|egin pjf|
|00000860| 20 6e 65 77 20 33 2f 32 | 37 0d 2d 2d 2d 2d 2d 2d | new 3/2|7.------|
|00000870| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2d 2d 20 6f |--------|---.-- o|
|00000880| 70 65 6e 73 74 61 63 6b | 20 68 61 6e 64 6c 65 72 |penstack| handler|
|00000890| 0d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|000008a0| 2d 2d 0d 6f 6e 20 6f 70 | 65 6e 73 74 61 63 6b 0d |--.on op|enstack.|
|000008b0| 67 6c 6f 62 61 6c 20 70 | 66 42 65 65 6e 42 65 66 |global p|fBeenBef|
|000008c0| 6f 72 65 0d 61 64 64 20 | 31 20 74 6f 20 6c 69 6e |ore.add |1 to lin|
|000008d0| 65 20 33 20 6f 66 20 70 | 66 42 65 65 6e 42 65 66 |e 3 of p|fBeenBef|
|000008e0| 6f 72 65 0d 72 65 73 65 | 74 20 6d 65 6e 75 62 61 |ore.rese|t menuba|
|000008f0| 72 0d 6d 61 6b 65 4d 65 | 6e 75 73 0d 69 66 20 6c |r.makeMe|nus.if l|
|00000900| 69 6e 65 20 33 20 6f 66 | 20 70 66 42 65 65 6e 42 |ine 3 of| pfBeenB|
|00000910| 65 66 6f 72 65 20 69 73 | 20 31 20 74 68 65 6e 0d |efore is| 1 then.|
|00000920| 4f 6e 65 54 69 6d 65 4f | 6e 6c 79 0d 65 6e 64 20 |OneTimeO|nly.end |
|00000930| 69 66 0d 69 66 20 74 68 | 65 20 6f 70 74 69 6f 6e |if.if th|e option|
|00000940| 6b 65 79 20 69 73 20 6e | 6f 74 20 64 6f 77 6e 20 |key is n|ot down |
|00000950| 74 68 65 6e 0d 73 65 74 | 20 63 61 6e 74 6d 6f 64 |then.set| cantmod|
|00000960| 69 66 79 20 6f 66 20 74 | 68 69 73 20 73 74 61 63 |ify of t|his stac|
|00000970| 6b 20 74 6f 20 74 72 75 | 65 0d 2d 2d 20 73 65 74 |k to tru|e.-- set|
|00000980| 20 74 68 65 20 75 73 65 | 72 6c 65 76 65 6c 20 74 | the use|rlevel t|
|00000990| 6f 20 34 0d 65 6c 73 65 | 0d 73 65 74 20 63 61 6e |o 4.else|.set can|
|000009a0| 74 6d 6f 64 69 66 79 20 | 6f 66 20 74 68 69 73 20 |tmodify |of this |
|000009b0| 73 74 61 63 6b 20 74 6f | 20 66 61 6c 73 65 0d 73 |stack to| false.s|
|000009c0| 65 74 20 74 68 65 20 75 | 73 65 72 6c 65 76 65 6c |et the u|serlevel|
|000009d0| 20 74 6f 20 35 0d 65 6e | 64 20 69 66 0d 73 65 74 | to 5.en|d if.set|
|000009e0| 20 75 73 65 72 6d 6f 64 | 69 66 79 20 74 6f 20 74 | usermod|ify to t|
|000009f0| 72 75 65 0d 65 6e 64 20 | 6f 70 65 6e 73 74 61 63 |rue.end |openstac|
|00000a00| 6b 0d 0d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |k..-----|--------|
|00000a10| 2d 2d 2d 2d 0d 2d 2d 20 | 4f 6e 65 54 69 6d 65 4f |----.-- |OneTimeO|
|00000a20| 6e 6c 79 20 68 61 6e 64 | 6c 65 72 0d 2d 2d 2d 2d |nly hand|ler.----|
|00000a30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 6f 6e |--------|-----.on|
|00000a40| 20 4f 6e 65 54 69 6d 65 | 4f 6e 6c 79 0d 67 6c 6f | OneTime|Only.glo|
|00000a50| 62 61 6c 20 6c 69 73 74 | 42 79 54 68 65 4e 75 6d |bal list|ByTheNum|
|00000a60| 62 65 72 2c 20 6c 69 73 | 74 4c 65 6e 67 74 68 2c |ber, lis|tLength,|
|00000a70| 20 74 68 65 43 61 72 64 | 4f 66 66 53 65 74 2c 20 | theCard|OffSet, |
|00000a80| 74 68 65 45 6e 76 73 0d | 67 6c 6f 62 61 6c 20 74 |theEnvs.|global t|
|00000a90| 68 65 53 79 73 2c 20 68 | 6f 6d 65 54 6f 0d 2d 2d |heSys, h|omeTo.--|
|00000aa0| 0d 73 65 74 20 63 75 72 | 73 6f 72 20 74 6f 20 62 |.set cur|sor to b|
|00000ab0| 75 73 79 0d 6c 6f 63 6b | 20 73 63 72 65 65 6e 0d |usy.lock| screen.|
|00000ac0| 2d 2d 0d 70 75 73 68 20 | 63 61 72 64 0d 67 6f 20 |--.push |card.go |
|00000ad0| 63 61 72 64 20 69 64 20 | 38 32 31 33 33 0d 72 65 |card id |82133.re|
|00000ae0| 73 65 74 70 72 65 66 73 | 20 73 74 61 72 74 75 70 |setprefs| startup|
|00000af0| 0d 70 6f 70 20 63 61 72 | 64 0d 2d 2d 0d 73 65 74 |.pop car|d.--.set|
|00000b00| 20 6c 6f 63 6b 6d 65 73 | 73 61 67 65 73 20 74 6f | lockmes|sages to|
|00000b10| 20 74 72 75 65 0d 2d 2d | 0d 70 75 73 68 20 63 61 | true.--|.push ca|
|00000b20| 72 64 0d 67 6f 20 62 67 | 20 22 43 6f 6e 74 72 6f |rd.go bg| "Contro|
|00000b30| 6c 22 0d 68 6f 6d 65 69 | 63 6f 6e 0d 73 65 74 20 |l".homei|con.set |
|00000b40| 73 74 79 6c 65 20 6f 66 | 20 62 67 20 66 6c 64 20 |style of| bg fld |
|00000b50| 22 74 68 65 4c 69 73 74 | 22 20 74 6f 20 72 65 63 |"theList|" to rec|
|00000b60| 74 61 6e 67 6c 65 0d 67 | 6f 20 62 67 20 22 4d 61 |tangle.g|o bg "Ma|
|00000b70| 69 6e 22 0d 68 6f 6d 65 | 69 63 6f 6e 0d 2d 2d 0d |in".home|icon.--.|
|00000b80| 49 6e 69 74 4c 69 73 74 | 69 6e 67 73 0d 2d 2d 0d |InitList|ings.--.|
|00000b90| 70 6f 70 20 63 61 72 64 | 0d 75 6e 6c 6f 63 6b 20 |pop card|.unlock |
|00000ba0| 73 63 72 65 65 6e 0d 73 | 65 74 20 6c 6f 63 6b 6d |screen.s|et lockm|
|00000bb0| 65 73 73 61 67 65 73 20 | 74 6f 20 66 61 6c 73 65 |essages |to false|
|00000bc0| 0d 65 6e 64 20 4f 6e 65 | 54 69 6d 65 4f 6e 6c 79 |.end One|TimeOnly|
|00000bd0| 0d 2d 2d 20 65 6e 64 20 | 70 6a 66 20 6e 65 77 20 |.-- end |pjf new |
|00000be0| 33 2f 32 37 0d 0d 0d 6f | 6e 20 49 6e 69 74 4c 69 |3/27...o|n InitLi|
|00000bf0| 73 74 69 6e 67 73 0d 67 | 6c 6f 62 61 6c 20 6c 69 |stings.g|lobal li|
|00000c00| 73 74 42 79 54 68 65 4e | 75 6d 62 65 72 2c 20 6c |stByTheN|umber, l|
|00000c10| 69 73 74 4c 65 6e 67 74 | 68 2c 20 74 68 65 43 61 |istLengt|h, theCa|
|00000c20| 72 64 4f 66 66 53 65 74 | 2c 20 74 68 65 45 6e 76 |rdOffSet|, theEnv|
|00000c30| 73 2c 74 68 65 53 79 73 | 0d 69 66 20 6c 69 73 74 |s,theSys|.if list|
|00000c40| 42 79 54 68 65 4e 75 6d | 62 65 72 20 69 73 20 65 |ByTheNum|ber is e|
|00000c50| 6d 70 74 79 20 74 68 65 | 6e 0d 67 65 74 54 68 65 |mpty the|n.getThe|
|00000c60| 45 6e 76 73 0d 70 75 74 | 20 74 68 65 20 6e 75 6d |Envs.put| the num|
|00000c70| 62 65 72 20 6f 66 20 63 | 61 72 64 20 22 4e 75 6d |ber of c|ard "Num|
|00000c80| 62 65 72 4c 69 73 74 69 | 6e 67 22 20 69 6e 74 6f |berListi|ng" into|
|00000c90| 20 74 68 65 43 61 72 64 | 4f 66 66 53 65 74 0d 70 | theCard|OffSet.p|
|00000ca0| 75 74 20 63 61 72 64 20 | 66 69 65 6c 64 20 22 54 |ut card |field "T|
|00000cb0| 4f 43 22 20 6f 66 20 63 | 61 72 64 20 74 68 65 43 |OC" of c|ard theC|
|00000cc0| 61 72 64 4f 66 66 53 65 | 74 20 69 6e 74 6f 20 6c |ardOffSe|t into l|
|00000cd0| 69 73 74 42 79 54 68 65 | 4e 75 6d 62 65 72 0d 70 |istByThe|Number.p|
|00000ce0| 75 74 20 6c 65 6e 67 74 | 68 28 6c 69 73 74 42 79 |ut lengt|h(listBy|
|00000cf0| 54 68 65 4e 75 6d 62 65 | 72 29 20 69 6e 74 6f 20 |TheNumbe|r) into |
|00000d00| 6c 69 73 74 4c 65 6e 67 | 74 68 0d 65 6e 64 20 69 |listLeng|th.end i|
|00000d10| 66 0d 65 6e 64 20 49 6e | 69 74 4c 69 73 74 69 6e |f.end In|itListin|
|00000d20| 67 73 0d 0d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |gs..----|--------|
|00000d30| 2d 2d 2d 2d 2d 2d 0d 2d | 2d 20 68 6f 6d 65 69 63 |------.-|- homeic|
|00000d40| 6f 6e 20 68 61 6e 64 6c | 65 72 0d 2d 2d 2d 2d 2d |on handl|er.-----|
|00000d50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 2d 2d |--------|-----.--|
|00000d60| 20 66 69 78 20 74 68 65 | 20 6e 61 76 69 67 61 74 | fix the| navigat|
|00000d70| 69 6f 6e 20 69 63 6f 6e | 73 20 66 72 6f 6d 20 61 |ion icon|s from a|
|00000d80| 6e 79 77 68 65 72 65 20 | 69 6e 20 74 68 65 20 73 |nywhere |in the s|
|00000d90| 74 61 63 6b 0d 0d 6f 6e | 20 68 6f 6d 65 69 63 6f |tack..on| homeico|
|00000da0| 6e 0d 67 6c 6f 62 61 6c | 20 68 6f 6d 65 74 6f 0d |n.global| hometo.|
|00000db0| 69 66 20 68 6f 6d 65 54 | 6f 20 69 73 20 65 6d 70 |if homeT|o is emp|
|00000dc0| 74 79 20 74 68 65 6e 0d | 73 65 74 20 69 63 6f 6e |ty then.|set icon|
|00000dd0| 20 6f 66 20 62 67 20 62 | 74 6e 20 22 48 6f 6d 65 | of bg b|tn "Home|
|00000de0| 22 20 74 6f 20 22 48 6f | 6d 65 22 0d 65 6c 73 65 |" to "Ho|me".else|
|00000df0| 0d 73 65 74 20 69 63 6f | 6e 20 6f 66 20 62 67 20 |.set ico|n of bg |
|00000e00| 62 74 6e 20 22 48 6f 6d | 65 22 20 74 6f 20 22 48 |btn "Hom|e" to "H|
|00000e10| 6f 6d 65 20 42 61 73 65 | 22 0d 65 6e 64 20 69 66 |ome Base|".end if|
|00000e20| 0d 65 6e 64 20 68 6f 6d | 65 69 63 6f 6e 0d 0d 2d |.end hom|eicon..-|
|00000e30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e40| 0d 2d 2d 20 67 65 74 54 | 68 65 45 6e 76 73 20 68 |.-- getT|heEnvs h|
|00000e50| 61 6e 64 6c 65 72 0d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |andler.-|--------|
|00000e60| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 6f 6e 20 67 65 74 54 |--------|.on getT|
|00000e70| 68 65 45 6e 76 73 0d 67 | 6c 6f 62 61 6c 20 74 68 |heEnvs.g|lobal th|
|00000e80| 65 45 6e 76 73 2c 20 74 | 68 65 45 6e 76 73 6d 0d |eEnvs, t|heEnvsm.|
|00000e90| 70 75 74 20 65 6d 70 74 | 79 20 69 6e 74 6f 20 74 |put empt|y into t|
|00000ea0| 68 65 45 6e 76 73 6d 0d | 70 75 74 20 73 79 73 45 |heEnvsm.|put sysE|
|00000eb0| 6e 76 28 29 20 69 6e 74 | 6f 20 74 68 65 53 79 73 |nv() int|o theSys|
|00000ec0| 0d 69 66 20 63 68 61 72 | 20 34 20 6f 66 20 74 68 |.if char| 4 of th|
|00000ed0| 65 20 6c 6f 6e 67 20 76 | 65 72 73 69 6f 6e 20 ad |e long v|ersion .|
|00000ee0| 20 22 30 22 20 74 68 65 | 6e 0d 70 75 74 20 63 68 | "0" the|n.put ch|
|00000ef0| 61 72 20 32 20 6f 66 20 | 74 68 65 20 6c 6f 6e 67 |ar 2 of |the long|
|00000f00| 20 76 65 72 73 69 6f 6e | 20 26 20 22 2e 22 20 26 | version| & "." &|
|00000f10| c2 0d 63 68 61 72 20 33 | 20 6f 66 20 74 68 65 20 |..char 3| of the |
|00000f20| 6c 6f 6e 67 20 76 65 72 | 73 69 6f 6e 20 26 20 22 |long ver|sion & "|
|00000f30| 2e 22 20 26 c2 0d 63 68 | 61 72 20 34 20 6f 66 20 |." &..ch|ar 4 of |
|00000f40| 74 68 65 20 6c 6f 6e 67 | 20 76 65 72 73 69 6f 6e |the long| version|
|00000f50| 20 69 6e 74 6f 20 74 68 | 65 45 6e 76 73 0d 65 6c | into th|eEnvs.el|
|00000f60| 73 65 0d 70 75 74 20 74 | 68 65 20 76 65 72 73 69 |se.put t|he versi|
|00000f70| 6f 6e 20 69 6e 74 6f 20 | 74 68 65 45 6e 76 73 0d |on into |theEnvs.|
|00000f80| 65 6e 64 20 69 66 0d 70 | 75 74 20 77 6f 72 64 20 |end if.p|ut word |
|00000f90| 33 20 74 6f 20 6c 65 6e | 67 74 68 28 6c 69 6e 65 |3 to len|gth(line|
|00000fa0| 20 32 20 6f 66 20 74 68 | 65 20 73 63 72 69 70 74 | 2 of th|e script|
|00000fb0| 20 6f 66 20 74 68 69 73 | 20 73 74 61 63 6b 29 20 | of this| stack) |
|00000fc0| c2 0d 6f 66 20 6c 69 6e | 65 20 32 20 6f 66 20 74 |..of lin|e 2 of t|
|00000fd0| 68 65 20 73 63 72 69 70 | 74 20 6f 66 20 74 68 69 |he scrip|t of thi|
|00000fe0| 73 20 73 74 61 63 6b 20 | 26 20 72 65 74 75 72 6e |s stack |& return|
|00000ff0| 20 62 65 66 6f 72 65 20 | 74 68 65 45 6e 76 73 0d | before |theEnvs.|
|00001000| 70 75 74 20 72 65 74 75 | 72 6e 20 26 20 69 74 65 |put retu|rn & ite|
|00001010| 6d 20 32 20 6f 66 20 74 | 68 65 53 79 73 20 61 66 |m 2 of t|heSys af|
|00001020| 74 65 72 20 74 68 65 45 | 6e 76 73 0d 70 75 74 20 |ter theE|nvs.put |
|00001030| 72 65 74 75 72 6e 20 26 | 20 69 74 65 6d 20 31 20 |return &| item 1 |
|00001040| 6f 66 20 6c 69 6e 65 20 | 32 20 6f 66 20 74 68 65 |of line |2 of the|
|00001050| 53 79 73 20 26 20 22 2d | 62 69 74 22 20 26 20 22 |Sys & "-|bit" & "|
|00001060| 2c 22 20 26 26 c2 0d 69 | 74 65 6d 20 32 20 6f 66 |," &&..i|tem 2 of|
|00001070| 20 6c 69 6e 65 20 32 20 | 6f 66 20 74 68 65 53 79 | line 2 |of theSy|
|00001080| 73 20 61 66 74 65 72 20 | 74 68 65 45 6e 76 73 0d |s after |theEnvs.|
|00001090| 70 75 74 20 22 74 65 6e | 6d 76 61 74 20 62 73 73 |put "ten|mvat bss|
|000010a0| 20 6e 20 70 79 76 73 73 | 22 20 69 6e 74 6f 20 74 | n pyvss|" into t|
|000010b0| 68 65 45 6e 76 73 6d 0d | 65 6e 64 20 67 65 74 54 |heEnvsm.|end getT|
|000010c0| 68 65 45 6e 76 73 0d 0d | 2d 2d 2d 2d 2d 2d 2d 2d |heEnvs..|--------|
|000010d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 2d 2d 20 63 6c 6f |--------|-.-- clo|
|000010e0| 73 65 73 74 61 63 6b 20 | 68 61 6e 64 6c 65 72 0d |sestack |handler.|
|000010f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001100| 2d 0d 6f 6e 20 63 6c 6f | 73 65 73 74 61 63 6b 0d |-.on clo|sestack.|
|00001110| 67 6c 6f 62 61 6c 20 63 | 75 72 44 61 74 65 4c 69 |global c|urDateLi|
|00001120| 73 74 2c 20 63 75 72 53 | 75 62 6a 65 63 74 4c 69 |st, curS|ubjectLi|
|00001130| 73 74 2c 20 63 75 72 49 | 6e 64 65 78 4c 69 73 74 |st, curI|ndexList|
|00001140| 0d 70 75 73 68 20 63 61 | 72 64 0d 73 65 74 20 6c |.push ca|rd.set l|
|00001150| 6f 63 6b 6d 65 73 73 61 | 67 65 73 20 74 6f 20 74 |ockmessa|ges to t|
|00001160| 72 75 65 0d 6c 6f 63 6b | 20 73 63 72 65 65 6e 0d |rue.lock| screen.|
|00001170| 70 75 74 20 65 6d 70 74 | 79 20 69 6e 74 6f 20 63 |put empt|y into c|
|00001180| 75 72 44 61 74 65 4c 69 | 73 74 0d 70 75 74 20 65 |urDateLi|st.put e|
|00001190| 6d 70 74 79 20 69 6e 74 | 6f 20 63 75 72 53 75 62 |mpty int|o curSub|
|000011a0| 6a 65 63 74 4c 69 73 74 | 0d 70 75 74 20 65 6d 70 |jectList|.put emp|
|000011b0| 74 79 20 69 6e 74 6f 20 | 63 75 72 49 6e 64 65 78 |ty into |curIndex|
|000011c0| 4c 69 73 74 0d 2d 2d 0d | 2d 2d 0d 67 6f 20 63 61 |List.--.|--.go ca|
|000011d0| 72 64 20 22 4e 75 6d 62 | 65 72 4c 69 73 74 69 6e |rd "Numb|erListin|
|000011e0| 67 22 0d 73 65 74 20 74 | 68 65 20 73 63 72 6f 6c |g".set t|he scrol|
|000011f0| 6c 20 6f 66 20 63 61 72 | 64 20 66 69 65 6c 64 20 |l of car|d field |
|00001200| 31 20 74 6f 20 30 0d 70 | 75 74 20 65 6d 70 74 79 |1 to 0.p|ut empty|
|00001210| 20 69 6e 74 6f 20 62 6b | 67 6e 64 20 66 69 65 6c | into bk|gnd fiel|
|00001220| 64 20 22 73 75 62 6a 65 | 63 74 22 0d 70 75 74 20 |d "subje|ct".put |
|00001230| 65 6d 70 74 79 20 69 6e | 74 6f 20 62 6b 67 6e 64 |empty in|to bkgnd|
|00001240| 20 66 69 65 6c 64 20 22 | 74 68 65 4c 69 73 74 22 | field "|theList"|
|00001250| 0d 2d 2d 0d 67 6f 20 63 | 61 72 64 20 22 44 61 74 |.--.go c|ard "Dat|
|00001260| 65 4c 69 73 74 69 6e 67 | 22 0d 69 66 20 74 68 65 |eListing|".if the|
|00001270| 20 73 74 79 6c 65 20 6f | 66 20 63 64 20 66 6c 64 | style o|f cd fld|
|00001280| 20 31 20 3d 20 22 73 63 | 72 6f 6c 6c 69 6e 67 22 | 1 = "sc|rolling"|
|00001290| 20 74 68 65 6e 0d 73 65 | 74 20 74 68 65 20 73 63 | then.se|t the sc|
|000012a0| 72 6f 6c 6c 20 6f 66 20 | 63 61 72 64 20 66 69 65 |roll of |card fie|
|000012b0| 6c 64 20 31 20 74 6f 20 | 30 0d 65 6e 64 20 69 66 |ld 1 to |0.end if|
|000012c0| 0d 70 75 74 20 65 6d 70 | 74 79 20 69 6e 74 6f 20 |.put emp|ty into |
|000012d0| 62 6b 67 6e 64 20 66 69 | 65 6c 64 20 22 73 75 62 |bkgnd fi|eld "sub|
|000012e0| 6a 65 63 74 22 0d 70 75 | 74 20 65 6d 70 74 79 20 |ject".pu|t empty |
|000012f0| 69 6e 74 6f 20 62 6b 67 | 6e 64 20 66 69 65 6c 64 |into bkg|nd field|
|00001300| 20 22 74 68 65 4c 69 73 | 74 22 0d 2d 2d 0d 67 6f | "theLis|t".--.go|
|00001310| 20 63 61 72 64 20 22 53 | 75 62 6a 65 63 74 4c 69 | card "S|ubjectLi|
|00001320| 73 74 69 6e 67 22 0d 73 | 65 74 20 74 68 65 20 73 |sting".s|et the s|
|00001330| 63 72 6f 6c 6c 20 6f 66 | 20 63 61 72 64 20 66 69 |croll of| card fi|
|00001340| 65 6c 64 20 31 20 74 6f | 20 30 0d 70 75 74 20 65 |eld 1 to| 0.put e|
|00001350| 6d 70 74 79 20 69 6e 74 | 6f 20 62 6b 67 6e 64 20 |mpty int|o bkgnd |
|00001360| 66 69 65 6c 64 20 22 73 | 75 62 6a 65 63 74 22 0d |field "s|ubject".|
|00001370| 70 75 74 20 65 6d 70 74 | 79 20 69 6e 74 6f 20 62 |put empt|y into b|
|00001380| 6b 67 6e 64 20 66 69 65 | 6c 64 20 22 74 68 65 4c |kgnd fie|ld "theL|
|00001390| 69 73 74 22 0d 2d 2d 0d | 67 6f 20 63 61 72 64 20 |ist".--.|go card |
|000013a0| 22 49 6e 64 65 78 4c 69 | 73 74 69 6e 67 22 0d 73 |"IndexLi|sting".s|
|000013b0| 65 74 20 74 68 65 20 73 | 63 72 6f 6c 6c 20 6f 66 |et the s|croll of|
|000013c0| 20 63 61 72 64 20 66 69 | 65 6c 64 20 31 20 74 6f | card fi|eld 1 to|
|000013d0| 20 30 0d 70 75 74 20 65 | 6d 70 74 79 20 69 6e 74 | 0.put e|mpty int|
|000013e0| 6f 20 62 6b 67 6e 64 20 | 66 69 65 6c 64 20 22 73 |o bkgnd |field "s|
|000013f0| 75 62 6a 65 63 74 22 0d | 70 75 74 20 65 6d 70 74 |ubject".|put empt|
|00001400| 79 20 69 6e 74 6f 20 62 | 6b 67 6e 64 20 66 69 65 |y into b|kgnd fie|
|00001410| 6c 64 20 22 74 68 65 4c | 69 73 74 22 0d 73 65 74 |ld "theL|ist".set|
|00001420| 20 74 68 65 20 74 6f 70 | 20 6f 66 20 63 61 72 64 | the top| of card|
|00001430| 20 62 74 6e 20 32 20 74 | 6f 20 28 28 74 6f 70 20 | btn 2 t|o ((top |
|00001440| 6f 66 20 63 61 72 64 20 | 66 69 65 6c 64 20 32 29 |of card |field 2)|
|00001450| 20 2b 20 31 29 0d 2d 2d | 0d 70 6f 70 20 63 61 72 | + 1).--|.pop car|
|00001460| 64 0d 2d 2d 20 69 73 20 | 6f 70 65 6e 65 64 20 61 |d.-- is |opened a|
|00001470| 74 20 74 68 65 20 73 61 | 6d 65 20 74 69 6d 65 3b |t the sa|me time;|
|00001480| 20 69 74 20 6b 65 65 70 | 73 20 74 72 61 63 6b 20 | it keep|s track |
|00001490| 6f 66 20 77 68 69 63 68 | 20 69 6e 64 65 78 20 74 |of which| index t|
|000014a0| 68 65 20 63 75 72 72 65 | 6e 74 5c 0d 2d 2d 20 73 |he curre|nt\.-- s|
|000014b0| 74 61 63 6b 20 73 68 6f | 75 6c 64 20 62 65 20 75 |tack sho|uld be u|
|000014c0| 73 69 6e 67 20 61 6e 64 | 20 73 77 69 74 63 68 65 |sing and| switche|
|000014d0| 73 20 74 6f 20 69 74 20 | 6f 6e 20 6f 70 65 6e 73 |s to it |on opens|
|000014e0| 74 61 63 6b 20 6f 72 20 | 72 65 73 75 6d 65 73 74 |tack or |resumest|
|000014f0| 61 63 6b 0d 75 6e 6c 6f | 63 6b 20 73 63 72 65 65 |ack.unlo|ck scree|
|00001500| 6e 0d 73 65 74 20 6c 6f | 63 6b 6d 65 73 73 61 67 |n.set lo|ckmessag|
|00001510| 65 73 20 74 6f 20 66 61 | 6c 73 65 0d 76 69 73 75 |es to fa|lse.visu|
|00001520| 61 6c 20 65 66 66 65 63 | 74 20 69 72 69 73 20 63 |al effec|t iris c|
|00001530| 6c 6f 73 65 0d 72 65 73 | 65 74 20 6d 65 6e 75 62 |lose.res|et menub|
|00001540| 61 72 0d 65 6e 64 20 63 | 6c 6f 73 65 73 74 61 63 |ar.end c|losestac|
|00001550| 6b 0d 0d 6f 6e 20 73 75 | 73 70 65 6e 64 53 74 61 |k..on su|spendSta|
|00001560| 63 6b 0d 2d 2d 20 6d 6f | 64 69 66 69 65 64 20 70 |ck.-- mo|dified p|
|00001570| 6a 66 20 31 2f 37 2f 39 | 31 0d 67 65 74 20 75 73 |jf 1/7/9|1.get us|
|00001580| 65 72 6c 65 76 65 6c 0d | 69 66 20 69 74 20 69 73 |erlevel.|if it is|
|00001590| 20 32 20 74 68 65 6e 20 | 73 65 74 20 75 73 65 72 | 2 then |set user|
|000015a0| 6c 65 76 65 6c 20 74 6f | 20 31 0d 2d 2d 20 65 6e |level to| 1.-- en|
|000015b0| 64 20 6d 6f 64 69 66 79 | 20 70 6a 66 20 31 2f 37 |d modify| pjf 1/7|
|000015c0| 2f 39 31 0d 72 65 73 65 | 74 20 6d 65 6e 75 62 61 |/91.rese|t menuba|
|000015d0| 72 0d 2d 2d 20 69 73 20 | 6f 70 65 6e 65 64 20 61 |r.-- is |opened a|
|000015e0| 74 20 74 68 65 20 73 61 | 6d 65 20 74 69 6d 65 3b |t the sa|me time;|
|000015f0| 20 69 74 20 6b 65 65 70 | 73 20 74 72 61 63 6b 20 | it keep|s track |
|00001600| 6f 66 20 77 68 69 63 68 | 20 69 6e 64 65 78 20 74 |of which| index t|
|00001610| 68 65 20 63 75 72 72 65 | 6e 74 5c 0d 2d 2d 20 73 |he curre|nt\.-- s|
|00001620| 74 61 63 6b 20 73 68 6f | 75 6c 64 20 62 65 20 75 |tack sho|uld be u|
|00001630| 73 69 6e 67 20 61 6e 64 | 20 73 77 69 74 63 68 65 |sing and| switche|
|00001640| 73 20 74 6f 20 69 74 20 | 6f 6e 20 6f 70 65 6e 73 |s to it |on opens|
|00001650| 74 61 63 6b 20 6f 72 20 | 72 65 73 75 6d 65 73 74 |tack or |resumest|
|00001660| 61 63 6b 0d 70 75 73 68 | 20 63 61 72 64 0d 65 6e |ack.push| card.en|
|00001670| 64 20 73 75 73 70 65 6e | 64 53 74 61 63 6b 0d 0d |d suspen|dStack..|
|00001680| 6f 6e 20 72 65 73 75 6d | 65 53 74 61 63 6b 0d 69 |on resum|eStack.i|
|00001690| 66 20 74 68 65 20 6f 70 | 74 69 6f 6e 4b 65 79 20 |f the op|tionKey |
|000016a0| 69 73 20 6e 6f 74 20 64 | 6f 77 6e 20 74 68 65 6e |is not d|own then|
|000016b0| 20 73 65 74 20 63 61 6e | 74 4d 6f 64 69 66 79 20 | set can|tModify |
|000016c0| 6f 66 20 74 68 69 73 20 | 73 74 61 63 6b 20 74 6f |of this |stack to|
|000016d0| 20 74 72 75 65 0d 73 65 | 74 20 6c 6f 63 6b 73 63 | true.se|t locksc|
|000016e0| 72 65 65 6e 20 74 6f 20 | 74 72 75 65 0d 72 65 73 |reen to |true.res|
|000016f0| 65 74 20 6d 65 6e 75 62 | 61 72 0d 2d 2d 20 6e 65 |et menub|ar.-- ne|
|00001700| 65 64 20 74 68 65 20 66 | 6f 6c 6c 6f 77 69 6e 67 |ed the f|ollowing|
|00001710| 20 6c 69 6e 65 20 74 6f | 20 6d 61 6b 65 20 73 75 | line to| make su|
|00001720| 72 65 20 74 68 69 73 20 | 73 74 61 63 6b 20 61 6c |re this |stack al|
|00001730| 77 61 79 73 20 75 73 65 | 73 0d 6d 61 6b 65 4d 65 |ways use|s.makeMe|
|00001740| 6e 75 73 0d 69 66 20 73 | 68 6f 72 74 20 6e 61 6d |nus.if s|hort nam|
|00001750| 65 20 6f 66 20 74 68 69 | 73 20 62 67 20 69 73 20 |e of thi|s bg is |
|00001760| 22 6d 61 69 6e 22 20 74 | 68 65 6e 0d 73 65 6e 64 |"main" t|hen.send|
|00001770| 20 6f 70 65 6e 62 61 63 | 6b 67 72 6f 75 6e 64 20 | openbac|kground |
|00001780| 74 6f 20 62 67 20 22 6d | 61 69 6e 22 0d 73 65 6e |to bg "m|ain".sen|
|00001790| 64 20 6f 70 65 6e 63 61 | 72 64 20 74 6f 20 62 67 |d openca|rd to bg|
|000017a0| 22 6d 61 69 6e 22 0d 65 | 6e 64 20 69 66 0d 65 6e |"main".e|nd if.en|
|000017b0| 64 20 72 65 73 75 6d 65 | 53 74 61 63 6b 0d 0d 2d |d resume|Stack..-|
|000017c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000017d0| 0d 2d 2d 20 47 6f 42 61 | 63 6b 20 68 61 6e 64 6c |.-- GoBa|ck handl|
|000017e0| 65 72 0d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |er.-----|--------|
|000017f0| 2d 2d 2d 2d 0d 6f 6e 20 | 67 6f 42 61 63 6b 0d 67 |----.on |goBack.g|
|00001800| 6c 6f 62 61 6c 20 68 6f | 6d 65 54 6f 0d 6c 6f 63 |lobal ho|meTo.loc|
|00001810| 6b 20 73 63 72 65 65 6e | 0d 70 6f 70 20 63 61 72 |k screen|.pop car|
|00001820| 64 20 69 6e 74 6f 20 62 | 61 63 6b 66 72 6f 6d 0d |d into b|ackfrom.|
|00001830| 69 66 20 62 61 63 6b 66 | 72 6f 6d 20 63 6f 6e 74 |if backf|rom cont|
|00001840| 61 69 6e 73 20 22 48 6f | 6d 65 22 20 74 68 65 6e |ains "Ho|me" then|
|00001850| 0d 61 6e 73 77 65 72 20 | 22 52 65 74 75 72 6e 20 |.answer |"Return |
|00001860| 74 6f 20 48 6f 6d 65 20 | 53 74 61 63 6b 3f 22 20 |to Home |Stack?" |
|00001870| 77 69 74 68 20 22 4f 4b | 22 20 6f 72 20 22 43 61 |with "OK|" or "Ca|
|00001880| 6e 63 65 6c 22 0d 69 66 | 20 69 74 20 69 73 20 22 |ncel".if| it is "|
|00001890| 4f 4b 22 20 74 68 65 6e | 0d 67 6f 20 48 6f 6d 65 |OK" then|.go Home|
|000018a0| 0d 65 78 69 74 20 67 6f | 42 61 63 6b 0d 65 6c 73 |.exit go|Back.els|
|000018b0| 65 0d 65 78 69 74 20 67 | 6f 42 61 63 6b 0d 65 6e |e.exit g|oBack.en|
|000018c0| 64 20 69 66 0d 65 6c 73 | 65 0d 69 66 20 62 61 63 |d if.els|e.if bac|
|000018d0| 6b 66 72 6f 6d 20 ad 20 | 74 68 65 20 6c 6f 6e 67 |kfrom . |the long|
|000018e0| 20 69 64 20 6f 66 20 74 | 68 69 73 20 63 61 72 64 | id of t|his card|
|000018f0| 20 74 68 65 6e 0d 69 66 | 20 62 61 63 6b 66 72 6f | then.if| backfro|
|00001900| 6d 20 63 6f 6e 74 61 69 | 6e 73 20 74 68 65 20 73 |m contai|ns the s|
|00001910| 68 6f 72 74 20 6e 61 6d | 65 20 6f 66 20 74 68 69 |hort nam|e of thi|
|00001920| 73 20 73 74 61 63 6b 20 | 74 68 65 6e 0d 67 6f 20 |s stack |then.go |
|00001930| 62 61 63 6b 66 72 6f 6d | 0d 75 6e 6c 6f 63 6b 20 |backfrom|.unlock |
|00001940| 73 63 72 65 65 6e 20 77 | 69 74 68 20 76 69 73 75 |screen w|ith visu|
|00001950| 61 6c 20 65 66 66 65 63 | 74 20 7a 6f 6f 6d 20 6f |al effec|t zoom o|
|00001960| 75 74 0d 65 78 69 74 20 | 67 6f 42 61 63 6b 0d 65 |ut.exit |goBack.e|
|00001970| 6c 73 65 20 20 2d 2d 20 | 66 72 6f 6d 20 61 20 64 |lse  -- |from a d|
|00001980| 69 66 66 65 72 65 6e 74 | 20 73 74 61 63 6b 0d 69 |ifferent| stack.i|
|00001990| 66 20 6c 69 6e 65 20 31 | 20 6f 66 20 68 6f 6d 65 |f line 1| of home|
|000019a0| 54 6f 20 3d 20 62 61 63 | 6b 66 72 6f 6d 20 74 68 |To = bac|kfrom th|
|000019b0| 65 6e 0d 70 75 73 68 20 | 63 61 72 64 20 2d 2d 20 |en.push |card -- |
|000019c0| 64 75 6d 6d 79 2c 20 67 | 65 74 73 20 70 6f 70 70 |dummy, g|ets popp|
|000019d0| 65 64 20 6f 6e 20 63 6c | 6f 73 65 20 63 61 72 64 |ed on cl|ose card|
|000019e0| 0d 64 65 6c 65 74 65 20 | 6c 69 6e 65 20 31 20 6f |.delete |line 1 o|
|000019f0| 66 20 68 6f 6d 65 54 6f | 0d 67 6f 20 62 61 63 6b |f homeTo|.go back|
|00001a00| 66 72 6f 6d 0d 6f 70 65 | 6e 62 61 63 6b 67 72 6f |from.ope|nbackgro|
|00001a10| 75 6e 64 0d 6f 70 65 6e | 63 61 72 64 0d 75 6e 6c |und.open|card.unl|
|00001a20| 6f 63 6b 20 73 63 72 65 | 65 6e 20 77 69 74 68 20 |ock scre|en with |
|00001a30| 76 69 73 75 61 6c 20 65 | 66 66 65 63 74 20 7a 6f |visual e|ffect zo|
|00001a40| 6f 6d 20 6f 75 74 0d 65 | 78 69 74 20 67 6f 42 61 |om out.e|xit goBa|
|00001a50| 63 6b 0d 65 6c 73 65 20 | 20 2d 2d 20 73 6f 72 72 |ck.else | -- sorr|
|00001a60| 79 2c 20 6f 6e 6c 79 20 | 67 6f 20 62 61 63 6b 20 |y, only |go back |
|00001a70| 69 66 20 68 6f 6d 65 74 | 6f 20 69 73 20 74 68 65 |if homet|o is the|
|00001a80| 20 73 61 6d 65 0d 67 6f | 42 61 63 6b 0d 65 78 69 | same.go|Back.exi|
|00001a90| 74 20 67 6f 42 61 63 6b | 0d 65 6e 64 20 69 66 20 |t goBack|.end if |
|00001aa0| 20 2d 2d 20 68 6f 6d 65 | 74 6f 20 3d 20 67 6f 62 | -- home|to = gob|
|00001ab0| 61 63 6b 0d 65 6e 64 20 | 69 66 20 20 2d 2d 20 66 |ack.end |if  -- f|
|00001ac0| 72 6f 6d 20 74 68 69 73 | 20 73 74 61 63 6b 0d 65 |rom this| stack.e|
|00001ad0| 6c 73 65 20 2d 2d 20 62 | 61 63 6b 46 72 6f 6d 20 |lse -- b|ackFrom |
|00001ae0| 69 73 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 63 |is the c|urrent c|
|00001af0| 61 72 64 0d 67 6f 42 61 | 63 6b 0d 65 78 69 74 20 |ard.goBa|ck.exit |
|00001b00| 67 6f 42 61 63 6b 0d 65 | 6e 64 20 69 66 0d 65 6e |goBack.e|nd if.en|
|00001b10| 64 20 69 66 0d 65 6e 64 | 20 67 6f 42 61 63 6b 0d |d if.end| goBack.|
|00001b20| 0d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|00001b30| 2d 2d 0d 2d 2d 20 67 6f | 50 72 69 6e 74 49 74 20 |--.-- go|PrintIt |
|00001b40| 68 61 6e 64 6c 65 72 0d | 2d 2d 2d 2d 2d 2d 2d 2d |handler.|--------|
|00001b50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 2d 2d 0d 6f 6e 20 |--------|-.--.on |
|00001b60| 67 6f 50 72 69 6e 74 49 | 74 0d 73 65 74 20 63 75 |goPrintI|t.set cu|
|00001b70| 72 73 6f 72 20 74 6f 20 | 62 75 73 79 0d 2d 2d 20 |rsor to |busy.-- |
|00001b80| 69 66 20 6f 70 74 69 6f | 6e 6b 65 79 20 74 68 65 |if optio|nkey the|
|00001b90| 6e 20 70 72 69 6e 74 20 | 74 68 65 20 65 6e 74 69 |n print |the enti|
|00001ba0| 72 65 20 73 74 61 63 6b | 0d 69 66 20 74 68 65 20 |re stack|.if the |
|00001bb0| 6f 70 74 69 6f 6e 6b 65 | 79 20 69 73 20 22 64 6f |optionke|y is "do|
|00001bc0| 77 6e 22 20 74 68 65 6e | 0d 61 6e 73 77 65 72 20 |wn" then|.answer |
|00001bd0| 22 50 72 69 6e 74 20 74 | 68 65 20 65 6e 74 69 72 |"Print t|he entir|
|00001be0| 65 20 54 65 63 68 6e 69 | 63 61 6c 20 4e 6f 74 65 |e Techni|cal Note|
|00001bf0| 73 20 53 74 61 63 6b 3f | 22 c2 0d 77 69 74 68 20 |s Stack?|"..with |
|00001c00| 22 4f 4b 22 20 6f 72 20 | 22 43 61 6e 63 65 6c 22 |"OK" or |"Cancel"|
|00001c10| 0d 69 66 20 69 74 20 3d | 20 22 43 61 6e 63 65 6c |.if it =| "Cancel|
|00001c20| 22 20 74 68 65 6e 0d 65 | 78 69 74 20 67 6f 50 72 |" then.e|xit goPr|
|00001c30| 69 6e 74 49 74 0d 65 6c | 73 65 0d 2d 2d 20 70 72 |intIt.el|se.-- pr|
|00001c40| 6f 63 65 73 73 20 61 6e | 64 20 70 72 69 6e 74 20 |ocess an|d print |
|00001c50| 74 68 65 20 65 6e 74 69 | 72 65 20 73 74 61 63 6b |the enti|re stack|
|00001c60| 0d 70 75 73 68 20 63 61 | 72 64 0d 67 6f 20 66 69 |.push ca|rd.go fi|
|00001c70| 72 73 74 20 63 61 72 64 | 20 6f 66 20 62 67 20 22 |rst card| of bg "|
|00001c80| 4d 61 69 6e 22 0d 72 65 | 70 65 61 74 20 75 6e 74 |Main".re|peat unt|
|00001c90| 69 6c 20 62 67 20 66 6c | 64 20 22 6e 75 6d 62 65 |il bg fl|d "numbe|
|00001ca0| 72 22 20 6f 66 20 6c 61 | 73 74 20 63 61 72 64 20 |r" of la|st card |
|00001cb0| 69 73 20 69 6e 20 62 67 | 20 66 6c 64 20 22 6e 75 |is in bg| fld "nu|
|00001cc0| 6d 62 65 72 22 20 6f 66 | 20 70 72 65 76 20 63 61 |mber" of| prev ca|
|00001cd0| 72 64 0d 69 66 20 70 72 | 69 6e 74 49 74 28 29 20 |rd.if pr|intIt() |
|00001ce0| 69 73 20 6e 6f 74 20 65 | 6d 70 74 79 20 74 68 65 |is not e|mpty the|
|00001cf0| 6e 20 65 78 69 74 20 72 | 65 70 65 61 74 0d 67 6f |n exit r|epeat.go|
|00001d00| 20 6e 65 78 74 20 63 61 | 72 64 0d 65 6e 64 20 72 | next ca|rd.end r|
|00001d10| 65 70 65 61 74 0d 70 6f | 70 20 63 61 72 64 0d 65 |epeat.po|p card.e|
|00001d20| 6e 64 20 69 66 0d 2d 2d | 0d 65 6c 73 65 0d 69 66 |nd if.--|.else.if|
|00001d30| 20 74 68 65 20 73 68 6f | 72 74 20 6e 61 6d 65 20 | the sho|rt name |
|00001d40| 6f 66 20 74 68 69 73 20 | 62 67 20 69 73 20 22 4d |of this |bg is "M|
|00001d50| 61 69 6e 22 20 74 68 65 | 6e 0d 70 75 74 20 62 6b |ain" the|n.put bk|
|00001d60| 67 6e 64 20 66 69 65 6c | 64 20 22 6e 75 6d 62 65 |gnd fiel|d "numbe|
|00001d70| 72 22 20 69 6e 74 6f 20 | 70 72 65 4e 75 6d 0d 2d |r" into |preNum.-|
|00001d80| 2d 0d 69 66 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |-.if the| number |
|00001d90| 6f 66 20 63 68 61 72 73 | 20 69 6e 20 70 72 65 4e |of chars| in preN|
|00001da0| 75 6d 20 3e 20 33 20 74 | 68 65 6e 0d 61 6e 73 77 |um > 3 t|hen.answ|
|00001db0| 65 72 20 22 50 72 69 6e | 74 20 74 65 78 74 20 66 |er "Prin|t text f|
|00001dc0| 72 6f 6d 20 74 68 69 73 | 20 63 61 72 64 20 6f 72 |rom this| card or|
|00001dd0| 20 65 6e 74 69 72 65 20 | 4e 6f 74 65 3f 22 c2 0d | entire |Note?"..|
|00001de0| 77 69 74 68 20 22 43 61 | 72 64 22 20 6f 72 20 22 |with "Ca|rd" or "|
|00001df0| 4e 6f 74 65 22 20 6f 72 | 20 22 43 61 6e 63 65 6c |Note" or| "Cancel|
|00001e00| 22 0d 69 66 20 69 74 20 | 3d 20 22 43 61 6e 63 65 |".if it |= "Cance|
|00001e10| 6c 22 20 74 68 65 6e 0d | 65 78 69 74 20 67 6f 50 |l" then.|exit goP|
|00001e20| 72 69 6e 74 49 74 0d 65 | 6c 73 65 0d 69 66 20 69 |rintIt.e|lse.if i|
|00001e30| 74 20 3d 20 22 43 61 72 | 64 22 20 74 68 65 6e 0d |t = "Car|d" then.|
|00001e40| 67 65 74 20 70 72 69 6e | 74 49 74 28 29 20 2d 2d |get prin|tIt() --|
|00001e50| 20 70 72 69 6e 74 20 6a | 75 73 74 20 74 68 65 20 | print j|ust the |
|00001e60| 63 61 72 64 0d 65 6c 73 | 65 0d 69 66 20 69 74 20 |card.els|e.if it |
|00001e70| 3d 20 22 4e 6f 74 65 22 | 20 74 68 65 6e 0d 70 75 |= "Note"| then.pu|
|00001e80| 73 68 20 63 61 72 64 0d | 64 65 6c 65 74 65 20 63 |sh card.|delete c|
|00001e90| 68 61 72 20 34 20 6f 66 | 20 70 72 65 4e 75 6d 0d |har 4 of| preNum.|
|00001ea0| 72 65 70 65 61 74 20 75 | 6e 74 69 6c 20 70 72 65 |repeat u|ntil pre|
|00001eb0| 4e 75 6d 20 69 73 20 6e | 6f 74 20 69 6e 20 62 6b |Num is n|ot in bk|
|00001ec0| 67 6e 64 20 66 69 65 6c | 64 20 22 6e 75 6d 62 65 |gnd fiel|d "numbe|
|00001ed0| 72 22 20 6f 66 20 70 72 | 65 76 20 63 61 72 64 0d |r" of pr|ev card.|
|00001ee0| 67 6f 20 70 72 65 76 20 | 63 61 72 64 0d 65 6e 64 |go prev |card.end|
|00001ef0| 20 72 65 70 65 61 74 0d | 72 65 70 65 61 74 20 75 | repeat.|repeat u|
|00001f00| 6e 74 69 6c 20 70 72 65 | 4e 75 6d 20 69 73 20 6e |ntil pre|Num is n|
|00001f10| 6f 74 20 69 6e 20 62 6b | 67 6e 64 20 66 69 65 6c |ot in bk|gnd fiel|
|00001f20| 64 20 22 6e 75 6d 62 65 | 72 22 0d 69 66 20 70 72 |d "numbe|r".if pr|
|00001f30| 69 6e 74 49 74 28 29 20 | 69 73 20 6e 6f 74 20 65 |intIt() |is not e|
|00001f40| 6d 70 74 79 20 74 68 65 | 6e 20 65 78 69 74 20 72 |mpty the|n exit r|
|00001f50| 65 70 65 61 74 0d 67 6f | 20 6e 65 78 74 20 63 61 |epeat.go| next ca|
|00001f60| 72 64 0d 65 6e 64 20 72 | 65 70 65 61 74 0d 70 6f |rd.end r|epeat.po|
|00001f70| 70 20 63 61 72 64 0d 65 | 6e 64 20 69 66 20 2d 2d |p card.e|nd if --|
|00001f80| 20 4e 6f 74 65 0d 65 6e | 64 20 69 66 20 2d 2d 20 | Note.en|d if -- |
|00001f90| 43 61 72 64 0d 65 6e 64 | 20 69 66 20 2d 2d 20 43 |Card.end| if -- C|
|00001fa0| 61 6e 63 65 6c 0d 65 6c | 73 65 20 2d 2d 20 50 72 |ancel.el|se -- Pr|
|00001fb0| 69 6e 74 20 6f 72 20 63 | 61 6e 63 65 6c 20 66 72 |int or c|ancel fr|
|00001fc0| 6f 6d 20 73 69 6e 67 6c | 65 20 63 61 72 64 0d 61 |om singl|e card.a|
|00001fd0| 6e 73 77 65 72 20 22 50 | 72 69 6e 74 20 74 65 78 |nswer "P|rint tex|
|00001fe0| 74 20 66 72 6f 6d 20 74 | 68 69 73 20 63 61 72 64 |t from t|his card|
|00001ff0| 3f 22 c2 0d 77 69 74 68 | 20 22 4f 4b 22 20 6f 72 |?"..with| "OK" or|
|00002000| 20 22 43 61 6e 63 65 6c | 22 0d 69 66 20 69 74 20 | "Cancel|".if it |
|00002010| 3d 20 22 43 61 6e 63 65 | 6c 22 20 74 68 65 6e 0d |= "Cance|l" then.|
|00002020| 65 78 69 74 20 67 6f 50 | 72 69 6e 74 49 74 0d 65 |exit goP|rintIt.e|
|00002030| 6c 73 65 0d 67 65 74 20 | 70 72 69 6e 74 49 74 28 |lse.get |printIt(|
|00002040| 29 20 2d 2d 20 70 72 69 | 6e 74 20 6a 75 73 74 20 |) -- pri|nt just |
|00002050| 74 68 65 20 63 61 72 64 | 0d 65 6e 64 20 69 66 20 |the card|.end if |
|00002060| 2d 2d 20 50 72 69 6e 74 | 20 6f 72 20 63 61 6e 63 |-- Print| or canc|
|00002070| 65 6c 0d 65 6e 64 20 69 | 66 20 2d 2d 20 4d 75 6c |el.end i|f -- Mul|
|00002080| 74 69 70 6c 65 2d 43 61 | 72 64 20 4e 6f 74 65 0d |tiple-Ca|rd Note.|
|00002090| 65 6c 73 65 20 2d 2d 20 | 4e 6f 74 20 4d 61 69 6e |else -- |Not Main|
|000020a0| 20 62 67 2c 20 73 6f 20 | 6e 6f 20 63 68 65 63 6b | bg, so |no check|
|000020b0| 20 6e 65 63 65 73 73 61 | 72 79 0d 67 65 74 20 70 | necessa|ry.get p|
|000020c0| 72 69 6e 74 49 74 28 29 | 0d 65 6e 64 20 69 66 20 |rintIt()|.end if |
|000020d0| 2d 2d 20 57 68 69 63 68 | 20 62 67 3f 0d 65 6e 64 |-- Which| bg?.end|
|000020e0| 20 69 66 20 2d 2d 20 4f | 70 74 69 6f 6e 20 6b 65 | if -- O|ption ke|
|000020f0| 79 3f 0d 65 6e 64 20 67 | 6f 50 72 69 6e 74 49 74 |y?.end g|oPrintIt|
|00002100| 0d 0d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..------|--------|
|00002110| 2d 2d 2d 0d 2d 2d 20 4d | 6f 6f 66 43 75 72 73 6f |---.-- M|oofCurso|
|00002120| 72 20 68 61 6e 64 6c 65 | 72 0d 2d 2d 2d 2d 2d 2d |r handle|r.------|
|00002130| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 6f 6e 20 4d |--------|---.on M|
|00002140| 6f 6f 66 43 75 72 73 6f | 72 20 68 6f 77 6c 6f 6e |oofCurso|r howlon|
|00002150| 67 0d 69 66 20 68 6f 77 | 6c 6f 6e 67 20 69 73 20 |g.if how|long is |
|00002160| 65 6d 70 74 79 20 74 68 | 65 6e 0d 70 75 74 20 31 |empty th|en.put 1|
|00002170| 20 69 6e 74 6f 20 68 6f | 77 6c 6f 6e 67 0d 65 6c | into ho|wlong.el|
|00002180| 73 65 0d 65 6e 64 20 69 | 66 0d 70 75 74 20 68 6f |se.end i|f.put ho|
|00002190| 77 6c 6f 6e 67 20 69 6e | 74 6f 20 64 65 6c 61 79 |wlong in|to delay|
|000021a0| 0d 73 65 74 20 63 75 72 | 73 6f 72 20 74 6f 20 22 |.set cur|sor to "|
|000021b0| 64 6f 67 63 6f 77 32 22 | 0d 77 61 69 74 20 64 65 |dogcow2"|.wait de|
|000021c0| 6c 61 79 0d 73 65 74 20 | 63 75 72 73 6f 72 20 74 |lay.set |cursor t|
|000021d0| 6f 20 22 64 6f 67 63 6f | 77 33 22 0d 77 61 69 74 |o "dogco|w3".wait|
|000021e0| 20 64 65 6c 61 79 0d 73 | 65 74 20 63 75 72 73 6f | delay.s|et curso|
|000021f0| 72 20 74 6f 20 22 64 6f | 67 63 6f 77 34 22 0d 77 |r to "do|gcow4".w|
|00002200| 61 69 74 20 64 65 6c 61 | 79 0d 73 65 74 20 63 75 |ait dela|y.set cu|
|00002210| 72 73 6f 72 20 74 6f 20 | 22 64 6f 67 63 6f 77 35 |rsor to |"dogcow5|
|00002220| 22 0d 77 61 69 74 20 64 | 65 6c 61 79 0d 73 65 74 |".wait d|elay.set|
|00002230| 20 63 75 72 73 6f 72 20 | 74 6f 20 22 64 6f 67 63 | cursor |to "dogc|
|00002240| 6f 77 36 22 0d 77 61 69 | 74 20 64 65 6c 61 79 0d |ow6".wai|t delay.|
|00002250| 73 65 74 20 63 75 72 73 | 6f 72 20 74 6f 20 22 64 |set curs|or to "d|
|00002260| 6f 67 63 6f 77 37 22 0d | 77 61 69 74 20 64 65 6c |ogcow7".|wait del|
|00002270| 61 79 0d 73 65 74 20 63 | 75 72 73 6f 72 20 74 6f |ay.set c|ursor to|
|00002280| 20 22 64 6f 67 63 6f 77 | 38 22 0d 77 61 69 74 20 | "dogcow|8".wait |
|00002290| 64 65 6c 61 79 0d 73 65 | 74 20 63 75 72 73 6f 72 |delay.se|t cursor|
|000022a0| 20 74 6f 20 22 64 6f 67 | 63 6f 77 31 22 0d 77 61 | to "dog|cow1".wa|
|000022b0| 69 74 20 64 65 6c 61 79 | 0d 65 6e 64 20 4d 6f 6f |it delay|.end Moo|
|000022c0| 66 43 75 72 73 6f 72 0d | 0d 2d 2d 2d 2d 2d 2d 2d |fCursor.|.-------|
|000022d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 2d 2d 20 67 6f |--------|--.-- go|
|000022e0| 53 61 76 65 49 74 20 68 | 61 6e 64 6c 65 72 0d 2d |SaveIt h|andler.-|
|000022f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002300| 0d 6f 6e 20 67 6f 53 61 | 76 65 49 74 0d 2d 2d 20 |.on goSa|veIt.-- |
|00002310| 64 65 74 65 72 6d 69 6e | 65 20 66 69 6c 65 6e 61 |determin|e filena|
|00002320| 6d 65 20 66 72 6f 6d 20 | 63 61 72 64 0d 2d 2d 20 |me from |card.-- |
|00002330| 69 66 20 6e 6f 74 20 4d | 61 69 6e 20 62 67 2c 20 |if not M|ain bg, |
|00002340| 73 74 75 66 66 20 73 61 | 76 65 20 63 6f 6e 74 65 |stuff sa|ve conte|
|00002350| 6e 74 73 20 69 6e 74 6f | 20 73 61 76 65 54 68 69 |nts into| saveThi|
|00002360| 73 0d 2d 2d 0d 69 66 20 | 74 68 65 20 73 68 6f 72 |s.--.if |the shor|
|00002370| 74 20 6e 61 6d 65 20 6f | 66 20 74 68 69 73 20 62 |t name o|f this b|
|00002380| 67 20 69 73 20 22 4f 70 | 65 6e 69 6e 67 20 43 61 |g is "Op|ening Ca|
|00002390| 72 64 73 22 20 74 68 65 | 6e 0d 65 78 69 74 20 67 |rds" the|n.exit g|
|000023a0| 6f 53 61 76 65 49 74 0d | 65 6c 73 65 0d 69 66 20 |oSaveIt.|else.if |
|000023b0| 74 68 65 20 73 68 6f 72 | 74 20 6e 61 6d 65 20 6f |the shor|t name o|
|000023c0| 66 20 74 68 69 73 20 62 | 67 20 69 73 20 22 43 6f |f this b|g is "Co|
|000023d0| 6e 74 72 6f 6c 22 20 74 | 68 65 6e 0d 69 66 20 74 |ntrol" t|hen.if t|
|000023e0| 68 65 20 73 68 6f 72 74 | 20 6e 61 6d 65 20 6f 66 |he short| name of|
|000023f0| 20 74 68 69 73 20 63 64 | 20 69 73 20 22 4e 75 6d | this cd| is "Num|
|00002400| 62 65 72 4c 69 73 74 69 | 6e 67 22 20 74 68 65 6e |berListi|ng" then|
|00002410| 0d 70 75 74 20 22 54 65 | 63 68 6e 69 63 61 6c 20 |.put "Te|chnical |
|00002420| 4e 6f 74 65 73 20 4c 69 | 73 74 69 6e 67 22 20 69 |Notes Li|sting" i|
|00002430| 6e 74 6f 20 66 69 6c 65 | 4e 61 6d 65 0d 70 75 74 |nto file|Name.put|
|00002440| 20 62 67 20 66 6c 64 20 | 33 20 26 20 72 65 74 75 | bg fld |3 & retu|
|00002450| 72 6e 20 26 20 63 64 20 | 66 6c 64 20 22 54 4f 43 |rn & cd |fld "TOC|
|00002460| 22 20 69 6e 74 6f 20 73 | 61 76 65 54 68 69 73 0d |" into s|aveThis.|
|00002470| 65 6c 73 65 0d 69 66 20 | 62 67 20 66 6c 64 20 22 |else.if |bg fld "|
|00002480| 74 68 65 4c 69 73 74 22 | 20 69 73 20 65 6d 70 74 |theList"| is empt|
|00002490| 79 20 74 68 65 6e 0d 65 | 78 69 74 20 67 6f 53 61 |y then.e|xit goSa|
|000024a0| 76 65 49 74 20 2d 2d 20 | 61 6c 6c 20 6f 74 68 65 |veIt -- |all othe|
|000024b0| 72 20 63 61 72 64 73 20 | 6f 66 20 43 6f 6e 74 72 |r cards |of Contr|
|000024c0| 6f 6c 20 68 61 76 65 20 | 74 68 65 4c 69 73 74 0d |ol have |theList.|
|000024d0| 65 6c 73 65 0d 70 75 74 | 20 22 54 65 63 68 6e 69 |else.put| "Techni|
|000024e0| 63 61 6c 20 4e 6f 74 65 | 73 20 22 20 26 20 62 67 |cal Note|s " & bg|
|000024f0| 20 66 6c 64 20 22 73 75 | 62 6a 65 63 74 22 20 69 | fld "su|bject" i|
|00002500| 6e 74 6f 20 66 69 6c 65 | 4e 61 6d 65 0d 70 75 74 |nto file|Name.put|
|00002510| 20 62 67 20 66 6c 64 20 | 33 20 26 20 72 65 74 75 | bg fld |3 & retu|
|00002520| 72 6e c2 0d 26 20 62 67 | 20 66 6c 64 20 22 73 75 |rn..& bg| fld "su|
|00002530| 62 6a 65 63 74 22 20 26 | 20 72 65 74 75 72 6e c2 |bject" &| return.|
|00002540| 0d 26 20 62 67 20 66 6c | 64 20 22 74 68 65 4c 69 |.& bg fl|d "theLi|
|00002550| 73 74 22 20 69 6e 74 6f | 20 73 61 76 65 54 68 69 |st" into| saveThi|
|00002560| 73 0d 65 6e 64 20 69 66 | 20 2d 2d 20 74 68 65 4c |s.end if| -- theL|
|00002570| 69 73 74 20 65 6d 70 74 | 79 3f 0d 65 6e 64 20 69 |ist empt|y?.end i|
|00002580| 66 20 2d 2d 20 4e 75 6d | 62 65 72 4c 69 73 74 69 |f -- Num|berListi|
|00002590| 6e 67 3f 0d 65 6c 73 65 | 20 2d 2d 20 68 61 73 20 |ng?.else| -- has |
|000025a0| 74 6f 20 62 65 20 4d 61 | 69 6e 20 62 67 2c 20 6a |to be Ma|in bg, j|
|000025b0| 75 73 74 20 67 65 74 20 | 66 69 6c 65 6e 61 6d 65 |ust get |filename|
|000025c0| 0d 69 66 20 62 67 20 66 | 6c 64 20 22 54 65 78 74 |.if bg f|ld "Text|
|000025d0| 22 20 69 73 20 65 6d 70 | 74 79 20 74 68 65 6e 0d |" is emp|ty then.|
|000025e0| 65 78 69 74 20 67 6f 53 | 61 76 65 49 74 0d 65 6c |exit goS|aveIt.el|
|000025f0| 73 65 0d 70 75 74 20 62 | 67 20 66 6c 64 20 22 54 |se.put b|g fld "T|
|00002600| 69 74 6c 65 22 20 69 6e | 74 6f 20 66 69 6c 65 4e |itle" in|to fileN|
|00002610| 61 6d 65 0d 65 6e 64 20 | 69 66 20 2d 2d 20 54 65 |ame.end |if -- Te|
|00002620| 78 74 20 65 6d 70 74 79 | 3f 0d 65 6e 64 20 69 66 |xt empty|?.end if|
|00002630| 20 2d 2d 20 45 6e 64 20 | 6f 66 20 43 6f 6e 74 72 | -- End |of Contr|
|00002640| 6f 6c 20 62 67 0d 65 6e | 64 20 69 66 20 2d 2d 20 |ol bg.en|d if -- |
|00002650| 45 6e 64 20 6f 66 20 4f | 70 65 6e 69 6e 67 20 62 |End of O|pening b|
|00002660| 67 0d 2d 2d 0d 2d 2d 20 | 70 72 6f 63 65 73 73 20 |g.--.-- |process |
|00002670| 66 69 6c 65 6e 61 6d 65 | 73 20 66 6f 72 20 61 6e |filename|s for an|
|00002680| 79 20 62 61 63 6b 67 72 | 6f 75 6e 64 0d 2d 2d 0d |y backgr|ound.--.|
|00002690| 70 75 74 20 6c 65 6e 67 | 74 68 28 66 69 6c 65 4e |put leng|th(fileN|
|000026a0| 61 6d 65 29 20 69 6e 74 | 6f 20 66 6c 65 6e 67 74 |ame) int|o flengt|
|000026b0| 68 0d 69 66 20 66 6c 65 | 6e 67 74 68 20 3e 20 33 |h.if fle|ngth > 3|
|000026c0| 30 20 74 68 65 6e 0d 72 | 65 70 65 61 74 20 75 6e |0 then.r|epeat un|
|000026d0| 74 69 6c 20 6c 65 6e 67 | 74 68 28 66 69 6c 65 4e |til leng|th(fileN|
|000026e0| 61 6d 65 29 20 3c 20 33 | 31 0d 64 65 6c 65 74 65 |ame) < 3|1.delete|
|000026f0| 20 6c 61 73 74 20 77 6f | 72 64 20 6f 66 20 66 69 | last wo|rd of fi|
|00002700| 6c 65 4e 61 6d 65 0d 65 | 6e 64 20 72 65 70 65 61 |leName.e|nd repea|
|00002710| 74 0d 65 6e 64 20 69 66 | 0d 67 65 74 20 73 66 70 |t.end if|.get sfp|
|00002720| 75 74 66 69 6c 65 28 66 | 69 6c 65 4e 61 6d 65 29 |utfile(f|ileName)|
|00002730| 0d 69 66 20 69 74 20 69 | 73 20 65 6d 70 74 79 20 |.if it i|s empty |
|00002740| 74 68 65 6e 20 65 78 69 | 74 20 67 6f 53 61 76 65 |then exi|t goSave|
|00002750| 49 74 0d 73 65 74 20 63 | 75 72 73 6f 72 20 74 6f |It.set c|ursor to|
|00002760| 20 62 75 73 79 0d 70 75 | 74 20 69 74 20 69 6e 74 | busy.pu|t it int|
|00002770| 6f 20 66 69 6c 65 4e 61 | 6d 65 0d 2d 2d 0d 2d 2d |o fileNa|me.--.--|
|00002780| 20 6e 6f 77 20 74 68 61 | 74 20 77 65 20 68 61 76 | now tha|t we hav|
|00002790| 65 20 74 68 65 20 66 69 | 6c 65 6e 61 6d 65 2c 20 |e the fi|lename, |
|000027a0| 65 69 74 68 65 72 20 73 | 61 76 65 20 69 74 20 6f |either s|ave it o|
|000027b0| 72 20 70 72 6f 63 65 73 | 73 20 4d 61 69 6e 0d 2d |r proces|s Main.-|
|000027c0| 2d 0d 6f 70 65 6e 20 66 | 69 6c 65 20 66 69 6c 65 |-.open f|ile file|
|000027d0| 4e 61 6d 65 0d 69 66 20 | 74 68 65 20 73 68 6f 72 |Name.if |the shor|
|000027e0| 74 20 6e 61 6d 65 20 6f | 66 20 74 68 69 73 20 62 |t name o|f this b|
|000027f0| 67 20 ad 20 22 4d 61 69 | 6e 22 20 74 68 65 6e 0d |g . "Mai|n" then.|
|00002800| 77 72 69 74 65 20 73 61 | 76 65 54 68 69 73 20 74 |write sa|veThis t|
|00002810| 6f 20 66 69 6c 65 20 66 | 69 6c 65 4e 61 6d 65 0d |o file f|ileName.|
|00002820| 65 6c 73 65 0d 2d 2d 20 | 4d 61 69 6e 20 62 61 63 |else.-- |Main bac|
|00002830| 6b 67 72 6f 75 6e 64 2e | 20 20 63 68 65 63 6b 20 |kground.|  check |
|00002840| 66 6f 72 20 6d 75 6c 74 | 69 70 6c 65 20 63 61 72 |for mult|iple car|
|00002850| 64 73 20 61 6e 64 20 70 | 72 6f 63 65 73 73 0d 2d |ds and p|rocess.-|
|00002860| 2d 20 61 73 20 6e 65 63 | 65 73 73 61 72 79 20 74 |- as nec|essary t|
|00002870| 6f 20 73 61 76 65 20 61 | 20 73 69 6e 67 6c 65 20 |o save a| single |
|00002880| 66 69 6c 65 20 69 6e 20 | 6c 69 6d 69 74 65 64 20 |file in |limited |
|00002890| 6d 65 6d 6f 72 79 0d 70 | 75 74 20 62 6b 67 6e 64 |memory.p|ut bkgnd|
|000028a0| 20 66 69 65 6c 64 20 22 | 6e 75 6d 62 65 72 22 20 | field "|number" |
|000028b0| 69 6e 74 6f 20 70 72 65 | 4e 75 6d 0d 69 66 20 74 |into pre|Num.if t|
|000028c0| 68 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 63 68 61 |he numbe|r of cha|
|000028d0| 72 73 20 69 6e 20 70 72 | 65 4e 75 6d 20 3e 20 33 |rs in pr|eNum > 3|
|000028e0| 20 74 68 65 6e 0d 6c 6f | 63 6b 20 73 63 72 65 65 | then.lo|ck scree|
|000028f0| 6e 0d 70 75 73 68 20 63 | 61 72 64 0d 64 65 6c 65 |n.push c|ard.dele|
|00002900| 74 65 20 63 68 61 72 20 | 34 20 6f 66 20 70 72 65 |te char |4 of pre|
|00002910| 4e 75 6d 0d 72 65 70 65 | 61 74 20 75 6e 74 69 6c |Num.repe|at until|
|00002920| 20 70 72 65 4e 75 6d 20 | 69 73 20 6e 6f 74 20 69 | preNum |is not i|
|00002930| 6e 20 62 67 20 66 6c 64 | 20 22 6e 75 6d 62 65 72 |n bg fld| "number|
|00002940| 22 20 6f 66 20 70 72 65 | 76 20 63 61 72 64 0d 67 |" of pre|v card.g|
|00002950| 6f 20 70 72 65 76 20 63 | 61 72 64 0d 65 6e 64 20 |o prev c|ard.end |
|00002960| 72 65 70 65 61 74 0d 75 | 6e 6c 6f 63 6b 20 73 63 |repeat.u|nlock sc|
|00002970| 72 65 65 6e 0d 70 75 74 | 20 22 74 72 75 65 22 20 |reen.put| "true" |
|00002980| 69 6e 74 6f 20 66 69 72 | 73 74 43 61 72 64 20 2d |into fir|stCard -|
|00002990| 2d 20 66 69 72 73 74 20 | 63 61 72 64 20 6f 66 20 |- first |card of |
|000029a0| 73 65 74 0d 72 65 70 65 | 61 74 20 75 6e 74 69 6c |set.repe|at until|
|000029b0| 20 70 72 65 4e 75 6d 20 | 69 73 20 6e 6f 74 20 69 | preNum |is not i|
|000029c0| 6e 20 62 6b 67 6e 64 20 | 66 69 65 6c 64 20 22 6e |n bkgnd |field "n|
|000029d0| 75 6d 62 65 72 22 0d 70 | 75 74 20 62 67 20 66 6c |umber".p|ut bg fl|
|000029e0| 64 20 22 54 65 78 74 22 | 20 69 6e 74 6f 20 73 61 |d "Text"| into sa|
|000029f0| 76 65 54 68 69 73 0d 69 | 66 20 66 69 72 73 74 43 |veThis.i|f firstC|
|00002a00| 61 72 64 20 3d 20 22 74 | 72 75 65 22 20 74 68 65 |ard = "t|rue" the|
|00002a10| 6e 0d 64 65 6c 65 74 65 | 20 63 68 61 72 20 36 35 |n.delete| char 65|
|00002a20| 20 74 6f 20 37 39 20 6f | 66 20 6c 69 6e 65 20 31 | to 79 o|f line 1|
|00002a30| 20 6f 66 20 73 61 76 65 | 54 68 69 73 20 2d 2d 20 | of save|This -- |
|00002a40| 6b 69 6c 6c 20 70 61 67 | 65 20 23 73 0d 77 72 69 |kill pag|e #s.wri|
|00002a50| 74 65 20 73 61 76 65 54 | 68 69 73 20 74 6f 20 66 |te saveT|his to f|
|00002a60| 69 6c 65 20 66 69 6c 65 | 4e 61 6d 65 20 2d 2d 20 |ile file|Name -- |
|00002a70| 77 72 69 74 65 20 66 69 | 72 73 74 20 63 61 72 64 |write fi|rst card|
|00002a80| 0d 70 75 74 20 22 66 61 | 6c 73 65 22 20 69 6e 74 |.put "fa|lse" int|
|00002a90| 6f 20 66 69 72 73 74 43 | 61 72 64 0d 65 6c 73 65 |o firstC|ard.else|
|00002aa0| 0d 64 65 6c 65 74 65 20 | 6c 69 6e 65 20 31 20 6f |.delete |line 1 o|
|00002ab0| 66 20 73 61 76 65 54 68 | 69 73 20 2d 2d 20 63 75 |f saveTh|is -- cu|
|00002ac0| 74 20 6f 75 74 20 68 65 | 61 64 65 72 73 0d 77 72 |t out he|aders.wr|
|00002ad0| 69 74 65 20 73 61 76 65 | 54 68 69 73 20 74 6f 20 |ite save|This to |
|00002ae0| 66 69 6c 65 20 66 69 6c | 65 4e 61 6d 65 20 2d 2d |file fil|eName --|
|00002af0| 20 61 70 70 65 6e 64 20 | 6f 74 68 65 72 20 63 61 | append |other ca|
|00002b00| 72 64 73 0d 65 6e 64 20 | 69 66 0d 67 6f 20 6e 65 |rds.end |if.go ne|
|00002b10| 78 74 20 63 61 72 64 0d | 65 6e 64 20 72 65 70 65 |xt card.|end repe|
|00002b20| 61 74 0d 6c 6f 63 6b 20 | 73 63 72 65 65 6e 0d 70 |at.lock |screen.p|
|00002b30| 6f 70 20 63 61 72 64 0d | 75 6e 6c 6f 63 6b 20 73 |op card.|unlock s|
|00002b40| 63 72 65 65 6e 0d 65 6c | 73 65 20 2d 2d 20 4f 6e |creen.el|se -- On|
|00002b50| 6c 79 20 61 20 73 69 6e | 67 6c 65 20 63 61 72 64 |ly a sin|gle card|
|00002b60| 20 69 6e 20 74 68 65 20 | 73 65 74 0d 70 75 74 20 | in the |set.put |
|00002b70| 62 67 20 66 6c 64 20 22 | 54 65 78 74 22 20 69 6e |bg fld "|Text" in|
|00002b80| 74 6f 20 73 61 76 65 54 | 68 69 73 0d 77 72 69 74 |to saveT|his.writ|
|00002b90| 65 20 73 61 76 65 54 68 | 69 73 20 74 6f 20 66 69 |e saveTh|is to fi|
|00002ba0| 6c 65 20 66 69 6c 65 4e | 61 6d 65 20 2d 2d 20 77 |le fileN|ame -- w|
|00002bb0| 72 69 74 65 20 6f 6e 6c | 79 20 63 61 72 64 0d 65 |rite onl|y card.e|
|00002bc0| 6e 64 20 69 66 20 2d 2d | 20 45 6e 64 20 4d 75 6c |nd if --| End Mul|
|00002bd0| 74 69 70 6c 65 20 43 61 | 72 64 73 3f 0d 65 6e 64 |tiple Ca|rds?.end|
|00002be0| 20 69 66 20 2d 2d 20 4d | 61 69 6e 20 62 67 3f 0d | if -- M|ain bg?.|
|00002bf0| 2d 2d 0d 2d 2d 20 41 6c | 6c 20 77 72 69 74 69 6e |--.-- Al|l writin|
|00002c00| 67 20 73 68 6f 75 6c 64 | 20 6e 6f 77 20 62 65 20 |g should| now be |
|00002c10| 63 6f 6d 70 6c 65 74 65 | 0d 2d 2d 0d 63 6c 6f 73 |complete|.--.clos|
|00002c20| 65 20 66 69 6c 65 20 66 | 69 6c 65 4e 61 6d 65 0d |e file f|ileName.|
|00002c30| 65 6e 64 20 67 6f 53 61 | 76 65 49 74 0d 0d 2d 2d |end goSa|veIt..--|
|00002c40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00002c50| 2d 2d 20 67 6f 4e 6f 74 | 65 20 68 61 6e 64 6c 65 |-- goNot|e handle|
|00002c60| 72 0d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |r.------|--------|
|00002c70| 2d 2d 2d 0d 6f 6e 20 67 | 6f 4e 6f 74 65 0d 67 6c |---.on g|oNote.gl|
|00002c80| 6f 62 61 6c 20 74 68 65 | 45 6e 76 73 6d 0d 70 75 |obal the|Envsm.pu|
|00002c90| 74 20 22 45 6e 74 65 72 | 20 61 6e 79 20 54 65 63 |t "Enter| any Tec|
|00002ca0| 68 6e 69 63 61 6c 20 4e | 6f 74 65 20 6e 75 6d 62 |hnical N|ote numb|
|00002cb0| 65 72 20 69 6e 20 74 68 | 65 20 72 61 6e 67 65 22 |er in th|e range"|
|00002cc0| c2 0d 26 26 20 22 6f 66 | 20 30 30 30 20 74 6f 20 |..&& "of| 000 to |
|00002cd0| 32 39 33 22 20 69 6e 74 | 6f 20 69 74 0d 72 65 70 |293" int|o it.rep|
|00002ce0| 65 61 74 20 75 6e 74 69 | 6c 20 69 73 6e 75 6d 28 |eat unti|l isnum(|
|00002cf0| 69 74 29 20 69 73 20 74 | 72 75 65 20 4f 52 20 28 |it) is t|rue OR (|
|00002d00| 6d 61 69 6e 28 69 74 29 | 20 3d 20 22 50 79 6e 65 |main(it)| = "Pyne|
|00002d10| 68 66 20 67 75 72 20 71 | 62 74 70 62 6a 20 66 6e |hf gur q|btpbj fn|
|00002d20| 6c 66 20 5a 62 62 73 21 | 22 20 41 4e 44 20 74 68 |lf Zbbs!|" AND th|
|00002d30| 65 45 6e 76 73 6d 20 3d | 20 6d 61 69 6e 28 22 74 |eEnvsm =| main("t|
|00002d40| 65 6e 6d 76 61 74 20 62 | 73 73 20 6e 20 70 79 76 |enmvat b|ss n pyv|
|00002d50| 73 73 22 29 29 0d 61 73 | 6b 20 22 47 6f 20 74 6f |ss")).as|k "Go to|
|00002d60| 20 77 68 69 63 68 20 54 | 65 63 68 6e 69 63 61 6c | which T|echnical|
|00002d70| 20 4e 6f 74 65 20 3f 22 | 20 77 69 74 68 20 69 74 | Note ?"| with it|
|00002d80| 0d 69 66 20 74 68 65 20 | 72 65 73 75 6c 74 20 69 |.if the |result i|
|00002d90| 73 20 22 43 61 6e 63 65 | 6c 22 20 74 68 65 6e 20 |s "Cance|l" then |
|00002da0| 65 78 69 74 20 47 6f 4e | 6f 74 65 0d 69 66 20 74 |exit GoN|ote.if t|
|00002db0| 68 65 20 6c 61 73 74 20 | 63 68 61 72 20 6f 66 20 |he last |char of |
|00002dc0| 69 74 20 69 73 20 6e 6f | 74 20 61 6e 20 49 4e 54 |it is no|t an INT|
|00002dd0| 45 47 45 52 20 74 68 65 | 6e 20 64 65 6c 65 74 65 |EGER the|n delete|
|00002de0| 20 74 68 65 20 6c 61 73 | 74 20 63 68 61 72 20 6f | the las|t char o|
|00002df0| 66 20 69 74 0d 69 66 20 | 69 74 20 69 73 20 61 6e |f it.if |it is an|
|00002e00| 20 69 6e 74 65 67 65 72 | 20 41 4e 44 20 69 74 20 | integer| AND it |
|00002e10| 3e 3d 20 30 20 41 4e 44 | 20 69 74 20 3c 3d 20 32 |>= 0 AND| it <= 2|
|00002e20| 39 33 20 74 68 65 6e 20 | 70 75 74 20 22 74 72 75 |93 then |put "tru|
|00002e30| 65 22 20 69 6e 74 6f 20 | 49 6e 74 52 65 71 0d 69 |e" into |IntReq.i|
|00002e40| 66 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 20 |f the nu|mber of |
|00002e50| 63 68 61 72 73 20 69 6e | 20 69 74 20 3c 3d 20 33 |chars in| it <= 3|
|00002e60| 20 74 68 65 6e 20 70 75 | 74 20 22 74 72 75 65 22 | then pu|t "true"|
|00002e70| 20 69 6e 74 6f 20 52 44 | 69 67 69 74 0d 69 66 20 | into RD|igit.if |
|00002e80| 49 6e 74 52 65 71 20 69 | 73 20 4e 4f 54 20 22 74 |IntReq i|s NOT "t|
|00002e90| 72 75 65 22 20 4f 52 20 | 52 44 69 67 69 74 20 69 |rue" OR |RDigit i|
|00002ea0| 73 20 4e 4f 54 20 22 74 | 72 75 65 22 20 74 68 65 |s NOT "t|rue" the|
|00002eb0| 6e 0d 61 6e 73 77 65 72 | 20 22 41 20 54 65 63 68 |n.answer| "A Tech|
|00002ec0| 6e 69 63 61 6c 20 4e 6f | 74 65 20 6e 75 6d 62 65 |nical No|te numbe|
|00002ed0| 72 20 6d 75 73 74 20 62 | 65 20 61 20 70 6f 73 69 |r must b|e a posi|
|00002ee0| 74 69 76 65 20 49 4e 54 | 45 47 45 52 20 69 6e 20 |tive INT|EGER in |
|00002ef0| 74 68 65 20 72 61 6e 67 | 65 20 6f 66 22 c2 0d 26 |the rang|e of"..&|
|00002f00| 26 20 22 20 30 30 30 20 | 74 6f 20 32 39 33 20 6f |& " 000 |to 293 o|
|00002f10| 66 20 6e 6f 20 6d 6f 72 | 65 20 74 68 61 6e 20 74 |f no mor|e than t|
|00002f20| 68 72 65 65 20 44 49 47 | 49 54 53 2e 20 50 6c 65 |hree DIG|ITS. Ple|
|00002f30| 61 73 65 20 65 6e 74 65 | 72 20 61 20 76 61 6c 69 |ase ente|r a vali|
|00002f40| 64 20 6e 75 6d 62 65 72 | 2e 22 c2 0d 77 69 74 68 |d number|."..with|
|00002f50| 20 22 4f 4b 22 0d 70 75 | 74 20 22 45 6e 74 65 72 | "OK".pu|t "Enter|
|00002f60| 20 61 6e 79 20 54 65 63 | 68 6e 69 63 61 6c 20 4e | any Tec|hnical N|
|00002f70| 6f 74 65 20 6e 75 6d 62 | 65 72 20 69 6e 20 74 68 |ote numb|er in th|
|00002f80| 65 20 72 61 6e 67 65 22 | c2 0d 26 26 20 22 6f 66 |e range"|..&& "of|
|00002f90| 20 30 30 30 20 74 6f 20 | 32 39 33 22 20 69 6e 74 | 000 to |293" int|
|00002fa0| 6f 20 69 74 0d 6e 65 78 | 74 20 72 65 70 65 61 74 |o it.nex|t repeat|
|00002fb0| 0d 65 6e 64 20 69 66 0d | 65 6e 64 20 72 65 70 65 |.end if.|end repe|
|00002fc0| 61 74 0d 73 65 74 20 63 | 75 72 73 6f 72 20 74 6f |at.set c|ursor to|
|00002fd0| 20 62 75 73 79 0d 69 66 | 20 74 68 65 45 6e 76 73 | busy.if| theEnvs|
|00002fe0| 6d 20 3d 20 6d 61 69 6e | 28 22 74 65 6e 6d 76 61 |m = main|("tenmva|
|00002ff0| 74 20 62 73 73 20 6e 20 | 70 79 76 73 73 22 29 20 |t bss n |pyvss") |
|00003000| 41 4e 44 20 6d 61 69 6e | 28 69 74 29 20 3d 20 22 |AND main|(it) = "|
|00003010| 50 79 6e 65 68 66 20 67 | 75 72 20 71 62 74 70 62 |Pynehf g|ur qbtpb|
|00003020| 6a 20 66 6e 6c 66 20 5a | 62 62 73 21 22 20 74 68 |j fnlf Z|bbs!" th|
|00003030| 65 6e 20 67 6f 45 6e 76 | 73 6d 0d 65 6c 73 65 0d |en goEnv|sm.else.|
|00003040| 69 66 20 69 74 20 69 73 | 20 6e 6f 74 20 65 6d 70 |if it is| not emp|
|00003050| 74 79 20 74 68 65 6e 0d | 70 75 74 20 66 69 6e 64 |ty then.|put find|
|00003060| 54 65 63 68 4e 6f 74 65 | 28 69 74 29 20 69 6e 74 |TechNote|(it) int|
|00003070| 6f 20 74 68 65 4e 6f 74 | 65 20 2d 2d 20 66 69 6e |o theNot|e -- fin|
|00003080| 64 20 4e 6f 74 65 20 63 | 61 72 64 20 23 0d 69 66 |d Note c|ard #.if|
|00003090| 20 74 68 65 4e 6f 74 65 | 20 69 73 20 65 6d 70 74 | theNote| is empt|
|000030a0| 79 20 74 68 65 6e 0d 70 | 75 74 20 22 54 65 63 68 |y then.p|ut "Tech|
|000030b0| 6e 69 63 61 6c 20 4e 6f | 74 65 22 20 26 26 20 69 |nical No|te" && i|
|000030c0| 74 20 26 26 20 22 63 6f | 75 6c 64 20 6e 6f 74 20 |t && "co|uld not |
|000030d0| 62 65 20 66 6f 75 6e 64 | 2e 22 20 69 6e 74 6f 20 |be found|." into |
|000030e0| 74 68 65 4d 73 67 0d 67 | 65 74 20 64 69 61 6c 6f |theMsg.g|et dialo|
|000030f0| 67 28 74 68 65 4d 73 67 | 2c 22 4f 4b 22 2c 31 2c |g(theMsg|,"OK",1,|
|00003100| 43 68 69 63 61 67 6f 2c | 50 6c 61 69 6e 2c 31 32 |Chicago,|Plain,12|
|00003110| 29 0d 65 6c 73 65 0d 76 | 69 73 75 61 6c 20 65 66 |).else.v|isual ef|
|00003120| 66 65 63 74 20 64 69 73 | 73 6f 6c 76 65 20 66 61 |fect dis|solve fa|
|00003130| 73 74 0d 67 6f 20 63 61 | 72 64 20 28 74 68 65 4e |st.go ca|rd (theN|
|00003140| 6f 74 65 29 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |ote).end| if.end |
|00003150| 69 66 0d 65 6e 64 20 69 | 66 0d 65 6e 64 20 67 6f |if.end i|f.end go|
|00003160| 4e 6f 74 65 0d 0d 6f 6e | 20 67 6f 45 6e 76 73 6d |Note..on| goEnvsm|
|00003170| 0d 67 6c 6f 62 61 6c 20 | 74 68 65 45 6e 76 73 6d |.global |theEnvsm|
|00003180| 2c 61 62 6f 75 74 72 65 | 73 75 6c 74 0d 61 73 6b |,aboutre|sult.ask|
|00003190| 20 22 57 68 61 74 20 77 | 61 73 20 74 68 61 74 20 | "What w|as that |
|000031a0| 61 67 61 69 6e 3f 22 0d | 70 75 74 20 6d 61 69 6e |again?".|put main|
|000031b0| 28 61 62 6f 75 74 72 65 | 73 75 6c 74 29 20 69 6e |(aboutre|sult) in|
|000031c0| 74 6f 20 74 68 65 45 6e | 76 73 6d 0d 69 66 20 6d |to theEn|vsm.if m|
|000031d0| 61 69 6e 28 69 74 29 20 | 3d 20 22 50 79 6e 65 68 |ain(it) |= "Pyneh|
|000031e0| 66 20 67 75 72 20 71 62 | 74 70 62 6a 20 66 6e 6c |f gur qb|tpbj fnl|
|000031f0| 66 20 5a 62 62 73 21 22 | 20 41 4e 44 20 6d 61 69 |f Zbbs!"| AND mai|
|00003200| 6e 28 61 62 6f 75 74 72 | 65 73 75 6c 74 29 20 63 |n(aboutr|esult) c|
|00003210| 6f 6e 74 61 69 6e 73 20 | 22 51 72 69 72 79 62 63 |ontains |"Qrirybc|
|00003220| 72 65 22 20 74 68 65 6e | 0d 72 65 70 65 61 74 20 |re" then|.repeat |
|00003230| 77 69 74 68 20 77 68 69 | 63 68 20 3d 20 31 20 74 |with whi|ch = 1 t|
|00003240| 6f 20 33 0d 70 75 74 20 | 6d 61 69 6e 28 22 67 61 |o 3.put |main("ga|
|00003250| 63 76 70 67 20 5a 62 62 | 53 22 26 77 68 69 63 68 |cvpg Zbb|S"&which|
|00003260| 26 22 2c 31 2c 30 22 29 | 20 69 6e 74 6f 20 6d 61 |&",1,0")| into ma|
|00003270| 69 6e 73 74 72 65 61 6d | 0d 64 6f 20 6d 61 69 6e |instream|.do main|
|00003280| 73 74 72 65 61 6d 0d 65 | 6e 64 20 72 65 70 65 61 |stream.e|nd repea|
|00003290| 74 0d 65 6c 73 65 0d 61 | 6e 73 77 65 72 20 22 43 |t.else.a|nswer "C|
|000032a0| 6c 61 72 75 73 20 73 61 | 79 73 20 79 6f 75 d5 72 |larus sa|ys you.r|
|000032b0| 65 20 6c 6f 73 74 20 69 | 6e 20 74 68 65 20 77 65 |e lost i|n the we|
|000032c0| 65 64 73 21 22 20 77 69 | 74 68 20 22 59 65 73 20 |eds!" wi|th "Yes |
|000032d0| 49 20 41 6d 22 0d 70 75 | 74 20 65 6d 70 74 79 20 |I Am".pu|t empty |
|000032e0| 69 6e 74 6f 20 74 68 65 | 45 6e 76 73 6d 0d 65 6e |into the|Envsm.en|
|000032f0| 64 20 69 66 0d 65 6e 64 | 20 67 6f 45 6e 76 73 6d |d if.end| goEnvsm|
|00003300| 0d 0d 0d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...-----|--------|
|00003310| 2d 2d 2d 2d 0d 2d 2d 20 | 41 62 6f 75 74 20 42 6f |----.-- |About Bo|
|00003320| 78 20 68 61 6e 64 6c 65 | 72 0d 2d 2d 2d 2d 2d 2d |x handle|r.------|
|00003330| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 6f 6e 20 61 |--------|---.on a|
|00003340| 62 6f 75 74 62 6f 78 0d | 67 6c 6f 62 61 6c 20 61 |boutbox.|global a|
|00003350| 62 6f 75 74 72 65 73 75 | 6c 74 0d 73 70 69 6e 61 |boutresu|lt.spina|
|00003360| 62 6f 75 74 0d 70 75 74 | 20 74 68 65 20 72 65 73 |bout.put| the res|
|00003370| 75 6c 74 20 69 6e 74 6f | 20 61 62 6f 75 74 72 65 |ult into| aboutre|
|00003380| 73 75 6c 74 0d 65 6e 64 | 20 61 62 6f 75 74 62 6f |sult.end| aboutbo|
|00003390| 78 0d 0d 6f 6e 20 6d 61 | 6b 65 4d 65 6e 75 73 0d |x..on ma|keMenus.|
|000033a0| 2d 2d 20 a5 a5 70 6a 66 | 20 33 2f 31 37 2f 39 31 |-- ..pjf| 3/17/91|
|000033b0| 20 73 74 72 65 61 6d 20 | 73 74 61 6e 64 61 72 64 | stream |standard|
|000033c0| 20 48 43 61 72 64 20 6d | 65 6e 75 73 2c 20 63 75 | HCard m|enus, cu|
|000033d0| 73 74 6f 6d 69 7a 65 20 | 70 72 69 6e 74 20 66 75 |stomize |print fu|
|000033e0| 6e 63 74 69 6f 6e 61 6c | 69 74 79 0d 2d 2d 20 65 |nctional|ity.-- e|
|000033f0| 61 73 79 20 6d 6f 64 69 | 66 69 63 61 74 69 6f 6e |asy modi|fication|
|00003400| 0d 69 66 20 74 68 65 20 | 6f 70 74 69 6f 6e 4b 65 |.if the |optionKe|
|00003410| 79 20 69 73 20 6e 6f 74 | 20 64 6f 77 6e 20 74 68 |y is not| down th|
|00003420| 65 6e 0d 69 66 20 22 54 | 6f 6f 6c 73 22 20 69 73 |en.if "T|ools" is|
|00003430| 20 69 6e 20 74 68 65 20 | 6d 65 6e 75 73 20 74 68 | in the |menus th|
|00003440| 65 6e 20 64 65 6c 65 74 | 65 20 6d 65 6e 75 20 22 |en delet|e menu "|
|00003450| 54 6f 6f 6c 73 22 0d 69 | 66 20 22 4f 62 6a 65 63 |Tools".i|f "Objec|
|00003460| 74 73 22 20 69 73 20 69 | 6e 20 74 68 65 20 6d 65 |ts" is i|n the me|
|00003470| 6e 75 73 20 74 68 65 6e | 20 64 65 6c 65 74 65 20 |nus then| delete |
|00003480| 6d 65 6e 75 20 22 4f 62 | 6a 65 63 74 73 22 0d 69 |menu "Ob|jects".i|
|00003490| 66 20 22 46 6f 6e 74 22 | 20 69 73 20 69 6e 20 74 |f "Font"| is in t|
|000034a0| 68 65 20 6d 65 6e 75 73 | 20 74 68 65 6e 20 64 65 |he menus| then de|
|000034b0| 6c 65 74 65 20 6d 65 6e | 75 20 22 46 6f 6e 74 22 |lete men|u "Font"|
|000034c0| 0d 69 66 20 22 53 74 79 | 6c 65 22 20 69 73 20 69 |.if "Sty|le" is i|
|000034d0| 6e 20 74 68 65 20 6d 65 | 6e 75 73 20 74 68 65 6e |n the me|nus then|
|000034e0| 20 64 65 6c 65 74 65 20 | 6d 65 6e 75 20 22 53 74 | delete |menu "St|
|000034f0| 79 6c 65 22 0d 65 6e 64 | 20 69 66 0d 0d 64 65 6c |yle".end| if..del|
|00003500| 65 74 65 20 6d 65 6e 75 | 69 74 65 6d 20 22 70 72 |ete menu|item "pr|
|00003510| 69 6e 74 20 63 61 72 64 | 22 20 6f 66 20 6d 65 6e |int card|" of men|
|00003520| 75 20 22 66 69 6c 65 22 | 0d 64 65 6c 65 74 65 20 |u "file"|.delete |
|00003530| 6d 65 6e 75 69 74 65 6d | 20 22 70 72 69 6e 74 20 |menuitem| "print |
|00003540| 73 74 61 63 6b 2e 2e 2e | 22 20 6f 66 20 6d 65 6e |stack...|" of men|
|00003550| 75 20 22 66 69 6c 65 22 | 0d 64 65 6c 65 74 65 20 |u "file"|.delete |
|00003560| 6d 65 6e 75 69 74 65 6d | 20 22 70 72 69 6e 74 20 |menuitem| "print |
|00003570| 72 65 70 6f 72 74 2e 2e | 2e 22 20 6f 66 20 6d 65 |report..|." of me|
|00003580| 6e 75 20 22 66 69 6c 65 | 22 0d 70 75 74 20 22 53 |nu "file|".put "S|
|00003590| 61 76 65 20 43 6f 70 79 | 20 74 6f 20 44 69 73 6b |ave Copy| to Disk|
|000035a0| 22 20 61 66 74 65 72 20 | 6d 65 6e 75 49 74 65 6d |" after |menuItem|
|000035b0| 20 22 53 61 76 65 20 61 | 20 43 6f 70 79 2e 2e 2e | "Save a| Copy...|
|000035c0| 22 20 c2 0d 6f 66 20 6d | 65 6e 75 20 22 46 69 6c |" ..of m|enu "Fil|
|000035d0| 65 22 20 77 69 74 68 20 | 6d 65 6e 75 4d 65 73 73 |e" with |menuMess|
|000035e0| 61 67 65 20 22 47 6f 53 | 61 76 65 49 74 22 0d 70 |age "GoS|aveIt".p|
|000035f0| 75 74 20 22 50 72 69 6e | 74 20 4e 6f 74 65 2f 4c |ut "Prin|t Note/L|
|00003600| 69 73 74 22 20 61 66 74 | 65 72 20 6d 65 6e 75 49 |ist" aft|er menuI|
|00003610| 74 65 6d 20 22 50 72 69 | 6e 74 20 46 69 65 6c 64 |tem "Pri|nt Field|
|00003620| 2e 2e 2e 22 20 c2 0d 6f | 66 20 6d 65 6e 75 20 22 |..." ..o|f menu "|
|00003630| 46 69 6c 65 22 20 77 69 | 74 68 20 6d 65 6e 75 4d |File" wi|th menuM|
|00003640| 65 73 73 61 67 65 20 22 | 47 6f 50 72 69 6e 74 49 |essage "|GoPrintI|
|00003650| 74 22 0d 70 75 74 20 22 | 2d 22 20 61 66 74 65 72 |t".put "|-" after|
|00003660| 20 6d 65 6e 75 49 74 65 | 6d 20 22 52 65 63 65 6e | menuIte|m "Recen|
|00003670| 74 22 20 6f 66 20 6d 65 | 6e 75 20 22 47 6f 22 0d |t" of me|nu "Go".|
|00003680| 70 75 74 20 22 47 6f 20 | 74 6f 20 41 6e 79 20 4e |put "Go |to Any N|
|00003690| 6f 74 65 22 20 61 66 74 | 65 72 20 6d 65 6e 75 69 |ote" aft|er menui|
|000036a0| 74 65 6d 20 22 2d 22 20 | c2 0d 6f 66 20 6d 65 6e |tem "-" |..of men|
|000036b0| 75 20 22 47 6f 22 20 77 | 69 74 68 20 6d 65 6e 75 |u "Go" w|ith menu|
|000036c0| 4d 65 73 73 61 67 65 20 | 22 47 6f 4e 6f 74 65 22 |Message |"GoNote"|
|000036d0| 0d 2d 2d 20 70 75 74 20 | 22 53 65 61 72 63 68 20 |.-- put |"Search |
|000036e0| 4b 6e 6f 77 6c 65 64 67 | 65 20 42 61 73 65 22 20 |Knowledg|e Base" |
|000036f0| 61 66 74 65 72 20 6d 65 | 6e 75 49 74 65 6d c2 0d |after me|nuItem..|
|00003700| 2d 2d 20 22 47 6f 20 74 | 6f 20 41 6e 79 20 4e 6f |-- "Go t|o Any No|
|00003710| 74 65 22 20 6f 66 20 6d | 65 6e 75 20 22 47 6f 22 |te" of m|enu "Go"|
|00003720| 20 77 69 74 68 20 6d 65 | 6e 75 4d 65 73 73 61 67 | with me|nuMessag|
|00003730| 65 73 c2 0d 2d 2d 20 67 | 6f 53 65 61 72 63 68 53 |es..-- g|oSearchS|
|00003740| 4b 42 0d 2d 2d 20 66 6f | 6c 6c 6f 77 69 6e 67 20 |KB.-- fo|llowing |
|00003750| 6f 6e 6c 79 20 65 6e 61 | 62 6c 65 64 20 77 68 65 |only ena|bled whe|
|00003760| 6e 20 69 6e 20 62 67 20 | 22 61 6e 73 77 65 72 73 |n in bg |"answers|
|00003770| 22 0d 64 69 73 61 62 6c | 65 20 6d 65 6e 75 69 74 |".disabl|e menuit|
|00003780| 65 6d 20 22 53 61 76 65 | 20 43 6f 70 79 20 74 6f |em "Save| Copy to|
|00003790| 20 44 69 73 6b 22 20 6f | 66 20 6d 65 6e 75 20 22 | Disk" o|f menu "|
|000037a0| 66 69 6c 65 22 0d 64 69 | 73 61 62 6c 65 20 6d 65 |file".di|sable me|
|000037b0| 6e 75 69 74 65 6d 20 22 | 50 72 69 6e 74 20 4e 6f |nuitem "|Print No|
|000037c0| 74 65 2f 4c 69 73 74 22 | 20 6f 66 20 6d 65 6e 75 |te/List"| of menu|
|000037d0| 20 22 66 69 6c 65 22 0d | 2d 2d 20 64 69 73 61 62 | "file".|-- disab|
|000037e0| 6c 65 20 6d 65 6e 75 69 | 74 65 6d 20 22 47 6f 20 |le menui|tem "Go |
|000037f0| 74 6f 20 41 6e 79 20 4e | 6f 74 65 22 20 6f 66 20 |to Any N|ote" of |
|00003800| 6d 65 6e 75 20 22 47 6f | 22 0d 2d 2d 20 64 69 73 |menu "Go|".-- dis|
|00003810| 61 62 6c 65 20 6d 65 6e | 75 69 74 65 6d 20 22 53 |able men|uitem "S|
|00003820| 65 61 72 63 68 20 43 61 | 72 64 22 20 6f 66 20 6d |earch Ca|rd" of m|
|00003830| 65 6e 75 20 22 47 6f 22 | 0d 2d 2d 20 a5 a5 70 6a |enu "Go"|.-- ..pj|
|00003840| 66 20 33 2f 31 37 2f 39 | 31 20 65 6e 64 20 6d 6f |f 3/17/9|1 end mo|
|00003850| 64 73 0d 69 66 20 22 4c | 69 73 74 22 20 69 73 20 |ds.if "L|ist" is |
|00003860| 6e 6f 74 20 69 6e 20 74 | 68 65 20 6d 65 6e 75 73 |not in t|he menus|
|00003870| 20 74 68 65 6e 0d 63 72 | 65 61 74 65 20 6d 65 6e | then.cr|eate men|
|00003880| 75 20 22 4c 69 73 74 22 | 0d 70 75 74 20 65 6d 70 |u "List"|.put emp|
|00003890| 74 79 20 69 6e 74 6f 20 | 6d 65 6e 75 20 22 4c 69 |ty into |menu "Li|
|000038a0| 73 74 22 0d 70 75 74 20 | 22 4c 69 73 74 20 42 79 |st".put |"List By|
|000038b0| 20 4e 75 6d 62 65 72 22 | 20 61 66 74 65 72 20 6d | Number"| after m|
|000038c0| 65 6e 75 20 22 4c 69 73 | 74 22 20 c2 0d 77 69 74 |enu "Lis|t" ..wit|
|000038d0| 68 20 6d 65 6e 75 4d 65 | 73 73 61 67 65 20 22 44 |h menuMe|ssage "D|
|000038e0| 69 73 70 6c 61 79 4c 69 | 73 74 22 20 26 26 20 71 |isplayLi|st" && q|
|000038f0| 75 6f 74 65 20 26 20 4e | 75 6d 62 65 72 20 26 20 |uote & N|umber & |
|00003900| 71 75 6f 74 65 0d 70 75 | 74 20 22 4c 69 73 74 20 |quote.pu|t "List |
|00003910| 42 79 20 52 65 76 69 73 | 69 6f 6e 20 44 61 74 65 |By Revis|ion Date|
|00003920| 22 20 61 66 74 65 72 20 | 6d 65 6e 75 20 22 4c 69 |" after |menu "Li|
|00003930| 73 74 22 20 c2 0d 77 69 | 74 68 20 6d 65 6e 75 4d |st" ..wi|th menuM|
|00003940| 65 73 73 61 67 65 20 22 | 44 69 73 70 6c 61 79 4c |essage "|DisplayL|
|00003950| 69 73 74 22 20 26 26 20 | 71 75 6f 74 65 20 26 20 |ist" && |quote & |
|00003960| 44 61 74 65 20 26 20 71 | 75 6f 74 65 0d 70 75 74 |Date & q|uote.put|
|00003970| 20 22 4c 69 73 74 20 42 | 79 20 53 75 62 6a 65 63 | "List B|y Subjec|
|00003980| 74 22 20 61 66 74 65 72 | 20 6d 65 6e 75 20 22 4c |t" after| menu "L|
|00003990| 69 73 74 22 20 c2 0d 77 | 69 74 68 20 6d 65 6e 75 |ist" ..w|ith menu|
|000039a0| 4d 65 73 73 61 67 65 20 | 22 44 69 73 70 6c 61 79 |Message |"Display|
|000039b0| 4c 69 73 74 22 20 26 26 | 20 71 75 6f 74 65 20 26 |List" &&| quote &|
|000039c0| 20 53 75 62 6a 65 63 74 | 20 26 20 71 75 6f 74 65 | Subject| & quote|
|000039d0| 0d 70 75 74 20 22 49 6e | 64 65 78 22 20 61 66 74 |.put "In|dex" aft|
|000039e0| 65 72 20 6d 65 6e 75 20 | 22 4c 69 73 74 22 20 c2 |er menu |"List" .|
|000039f0| 0d 77 69 74 68 20 6d 65 | 6e 75 4d 65 73 73 61 67 |.with me|nuMessag|
|00003a00| 65 20 22 44 69 73 70 6c | 61 79 4c 69 73 74 22 20 |e "Displ|ayList" |
|00003a10| 26 26 20 71 75 6f 74 65 | 20 26 20 49 6e 64 65 78 |&& quote| & Index|
|00003a20| 20 26 20 71 75 6f 74 65 | 0d 65 6e 64 20 69 66 0d | & quote|.end if.|
|00003a30| 69 66 20 22 58 52 65 66 | 22 20 69 73 20 6e 6f 74 |if "XRef|" is not|
|00003a40| 20 69 6e 20 74 68 65 20 | 6d 65 6e 75 73 20 74 68 | in the |menus th|
|00003a50| 65 6e 0d 63 72 65 61 74 | 65 20 6d 65 6e 75 20 22 |en.creat|e menu "|
|00003a60| 58 52 65 66 22 0d 64 69 | 73 61 62 6c 65 20 6d 65 |XRef".di|sable me|
|00003a70| 6e 75 20 22 58 52 65 66 | 22 0d 65 6e 64 20 69 66 |nu "XRef|".end if|
|00003a80| 0d 69 66 20 22 46 69 67 | 75 72 65 73 22 20 69 73 |.if "Fig|ures" is|
|00003a90| 20 6e 6f 74 20 69 6e 20 | 74 68 65 20 6d 65 6e 75 | not in |the menu|
|00003aa0| 73 20 74 68 65 6e 0d 63 | 72 65 61 74 65 20 6d 65 |s then.c|reate me|
|00003ab0| 6e 75 20 22 46 69 67 75 | 72 65 73 22 0d 64 69 73 |nu "Figu|res".dis|
|00003ac0| 61 62 6c 65 20 6d 65 6e | 75 20 22 46 69 67 75 72 |able men|u "Figur|
|00003ad0| 65 73 22 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 6d |es".end |if.end m|
|00003ae0| 61 6b 65 4d 65 6e 75 73 | 0d 0d 2d 2d 20 61 64 64 |akeMenus|..-- add|
|00003af0| 65 64 20 62 79 20 70 65 | 67 67 79 20 66 72 61 6e |ed by pe|ggy fran|
|00003b00| 63 7a 79 6b 2c 20 31 2f | 39 31 0d 2d 2d 20 6d 65 |czyk, 1/|91.-- me|
|00003b10| 73 73 61 67 65 20 70 61 | 73 73 65 64 20 77 68 65 |ssage pa|ssed whe|
|00003b20| 6e 20 6d 65 6e 75 20 61 | 6e 20 69 74 65 6d 20 69 |n menu a|n item i|
|00003b30| 73 20 73 65 6c 65 63 74 | 65 64 20 66 72 6f 6d 20 |s select|ed from |
|00003b40| 74 68 65 20 22 4c 69 73 | 74 22 20 6d 65 6e 75 0d |the "Lis|t" menu.|
|00003b50| 0d 6f 6e 20 44 69 73 70 | 6c 61 79 4c 69 73 74 20 |.on Disp|layList |
|00003b60| 43 68 65 63 6b 54 68 69 | 73 0d 67 6c 6f 62 61 6c |CheckThi|s.global|
|00003b70| 20 49 61 6d 43 68 65 63 | 6b 65 64 0d 73 65 74 20 | IamChec|ked.set |
|00003b80| 63 75 72 73 6f 72 20 74 | 6f 20 62 75 73 79 0d 69 |cursor t|o busy.i|
|00003b90| 66 20 43 68 65 63 6b 54 | 68 69 73 20 69 73 20 22 |f CheckT|his is "|
|00003ba0| 4e 75 6d 62 65 72 22 20 | 74 68 65 6e 0d 76 69 73 |Number" |then.vis|
|00003bb0| 75 61 6c 20 65 66 66 65 | 63 74 20 64 69 73 73 6f |ual effe|ct disso|
|00003bc0| 6c 76 65 0d 67 6f 20 63 | 61 72 64 20 69 64 20 32 |lve.go c|ard id 2|
|00003bd0| 33 39 32 31 2d 2d 20 4e | 75 6d 62 65 72 4c 69 73 |3921-- N|umberLis|
|00003be0| 74 69 6e 67 0d 49 66 20 | 49 61 6d 43 68 65 63 6b |ting.If |IamCheck|
|00003bf0| 65 64 20 69 73 20 6e 6f | 74 20 65 6d 70 74 79 20 |ed is no|t empty |
|00003c00| 74 68 65 6e 0d 73 65 74 | 20 63 68 65 63 6b 4d 61 |then.set| checkMa|
|00003c10| 72 6b 20 6f 66 20 6d 65 | 6e 75 49 74 65 6d 20 49 |rk of me|nuItem I|
|00003c20| 61 6d 43 68 65 63 6b 65 | 64 20 6f 66 20 6d 65 6e |amChecke|d of men|
|00003c30| 75 20 22 4c 69 73 74 22 | 20 74 6f 20 66 61 6c 73 |u "List"| to fals|
|00003c40| 65 0d 65 6e 64 20 69 66 | 0d 73 65 74 20 63 68 65 |e.end if|.set che|
|00003c50| 63 6b 4d 61 72 6b 20 6f | 66 20 6d 65 6e 75 49 74 |ckMark o|f menuIt|
|00003c60| 65 6d 20 31 20 6f 66 20 | 6d 65 6e 75 20 22 4c 69 |em 1 of |menu "Li|
|00003c70| 73 74 22 20 74 6f 20 74 | 72 75 65 0d 70 75 74 20 |st" to t|rue.put |
|00003c80| 31 20 69 6e 74 6f 20 49 | 61 6d 43 68 65 63 6b 65 |1 into I|amChecke|
|00003c90| 64 0d 65 6e 64 20 69 66 | 0d 69 66 20 43 68 65 63 |d.end if|.if Chec|
|00003ca0| 6b 54 68 69 73 20 69 73 | 20 22 44 61 74 65 22 20 |kThis is| "Date" |
|00003cb0| 74 68 65 6e 0d 76 69 73 | 75 61 6c 20 65 66 66 65 |then.vis|ual effe|
|00003cc0| 63 74 20 64 69 73 73 6f | 6c 76 65 0d 67 6f 20 63 |ct disso|lve.go c|
|00003cd0| 61 72 64 20 69 64 20 37 | 36 30 36 31 20 2d 2d 20 |ard id 7|6061 -- |
|00003ce0| 44 61 74 65 4c 69 73 74 | 69 6e 67 2f 43 6f 6e 74 |DateList|ing/Cont|
|00003cf0| 65 6e 74 73 20 4c 69 73 | 74 69 6e 67 0d 49 66 20 |ents Lis|ting.If |
|00003d00| 49 61 6d 43 68 65 63 6b | 65 64 20 69 73 20 6e 6f |IamCheck|ed is no|
|00003d10| 74 20 65 6d 70 74 79 20 | 74 68 65 6e 0d 73 65 74 |t empty |then.set|
|00003d20| 20 63 68 65 63 6b 4d 61 | 72 6b 20 6f 66 20 6d 65 | checkMa|rk of me|
|00003d30| 6e 75 49 74 65 6d 20 49 | 61 6d 43 68 65 63 6b 65 |nuItem I|amChecke|
|00003d40| 64 20 6f 66 20 6d 65 6e | 75 20 22 4c 69 73 74 22 |d of men|u "List"|
|00003d50| 20 74 6f 20 66 61 6c 73 | 65 0d 65 6e 64 20 69 66 | to fals|e.end if|
|00003d60| 0d 73 65 74 20 63 68 65 | 63 6b 4d 61 72 6b 20 6f |.set che|ckMark o|
|00003d70| 66 20 6d 65 6e 75 49 74 | 65 6d 20 32 20 6f 66 20 |f menuIt|em 2 of |
|00003d80| 6d 65 6e 75 20 22 4c 69 | 73 74 22 20 74 6f 20 74 |menu "Li|st" to t|
|00003d90| 72 75 65 0d 70 75 74 20 | 32 20 69 6e 74 6f 20 49 |rue.put |2 into I|
|00003da0| 61 6d 43 68 65 63 6b 65 | 64 0d 65 6e 64 20 69 66 |amChecke|d.end if|
|00003db0| 0d 69 66 20 43 68 65 63 | 6b 54 68 69 73 20 69 73 |.if Chec|kThis is|
|00003dc0| 20 22 53 75 62 6a 65 63 | 74 22 20 74 68 65 6e 0d | "Subjec|t" then.|
|00003dd0| 76 69 73 75 61 6c 20 65 | 66 66 65 63 74 20 64 69 |visual e|ffect di|
|00003de0| 73 73 6f 6c 76 65 0d 67 | 6f 20 63 61 72 64 20 69 |ssolve.g|o card i|
|00003df0| 64 20 32 32 31 31 30 20 | 2d 2d 20 53 75 62 6a 65 |d 22110 |-- Subje|
|00003e00| 63 74 20 4c 69 73 74 69 | 6e 67 0d 49 66 20 49 61 |ct Listi|ng.If Ia|
|00003e10| 6d 43 68 65 63 6b 65 64 | 20 69 73 20 6e 6f 74 20 |mChecked| is not |
|00003e20| 65 6d 70 74 79 20 74 68 | 65 6e 0d 73 65 74 20 63 |empty th|en.set c|
|00003e30| 68 65 63 6b 4d 61 72 6b | 20 6f 66 20 6d 65 6e 75 |heckMark| of menu|
|00003e40| 49 74 65 6d 20 49 61 6d | 43 68 65 63 6b 65 64 20 |Item Iam|Checked |
|00003e50| 6f 66 20 6d 65 6e 75 20 | 22 4c 69 73 74 22 20 74 |of menu |"List" t|
|00003e60| 6f 20 66 61 6c 73 65 0d | 65 6e 64 20 69 66 0d 73 |o false.|end if.s|
|00003e70| 65 74 20 63 68 65 63 6b | 4d 61 72 6b 20 6f 66 20 |et check|Mark of |
|00003e80| 6d 65 6e 75 49 74 65 6d | 20 33 20 6f 66 20 6d 65 |menuItem| 3 of me|
|00003e90| 6e 75 20 22 4c 69 73 74 | 22 20 74 6f 20 74 72 75 |nu "List|" to tru|
|00003ea0| 65 0d 70 75 74 20 33 20 | 69 6e 74 6f 20 49 61 6d |e.put 3 |into Iam|
|00003eb0| 43 68 65 63 6b 65 64 0d | 65 6e 64 20 69 66 0d 69 |Checked.|end if.i|
|00003ec0| 66 20 43 68 65 63 6b 54 | 68 69 73 20 69 73 20 22 |f CheckT|his is "|
|00003ed0| 49 6e 64 65 78 22 20 74 | 68 65 6e 0d 76 69 73 75 |Index" t|hen.visu|
|00003ee0| 61 6c 20 65 66 66 65 63 | 74 20 64 69 73 73 6f 6c |al effec|t dissol|
|00003ef0| 76 65 0d 67 6f 20 63 61 | 72 64 20 69 64 20 36 33 |ve.go ca|rd id 63|
|00003f00| 39 32 34 20 2d 2d 20 49 | 6e 64 65 78 4c 69 73 74 |924 -- I|ndexList|
|00003f10| 69 6e 67 0d 49 66 20 49 | 61 6d 43 68 65 63 6b 65 |ing.If I|amChecke|
|00003f20| 64 20 69 73 20 6e 6f 74 | 20 65 6d 70 74 79 20 74 |d is not| empty t|
|00003f30| 68 65 6e 0d 73 65 74 20 | 63 68 65 63 6b 4d 61 72 |hen.set |checkMar|
|00003f40| 6b 20 6f 66 20 6d 65 6e | 75 49 74 65 6d 20 49 61 |k of men|uItem Ia|
|00003f50| 6d 43 68 65 63 6b 65 64 | 20 6f 66 20 6d 65 6e 75 |mChecked| of menu|
|00003f60| 20 22 4c 69 73 74 22 20 | 74 6f 20 66 61 6c 73 65 | "List" |to false|
|00003f70| 0d 65 6e 64 20 69 66 0d | 73 65 74 20 63 68 65 63 |.end if.|set chec|
|00003f80| 6b 4d 61 72 6b 20 6f 66 | 20 6d 65 6e 75 49 74 65 |kMark of| menuIte|
|00003f90| 6d 20 34 20 6f 66 20 6d | 65 6e 75 20 22 4c 69 73 |m 4 of m|enu "Lis|
|00003fa0| 74 22 20 74 6f 20 74 72 | 75 65 0d 70 75 74 20 34 |t" to tr|ue.put 4|
|00003fb0| 20 69 6e 74 6f 20 49 61 | 6d 43 68 65 63 6b 65 64 | into Ia|mChecked|
|00003fc0| 0d 65 6e 64 20 69 66 0d | 65 6e 64 20 44 69 73 70 |.end if.|end Disp|
|00003fd0| 6c 61 79 4c 69 73 74 0d | 0d 2d 2d 0d 2d 2d 20 46 |layList.|.--.-- F|
|00003fe0| 55 4e 43 54 49 4f 4e 53 | 3a 20 70 72 69 6e 74 49 |UNCTIONS|: printI|
|00003ff0| 74 2c 20 66 69 6e 64 78 | 72 65 66 2c 20 66 69 6e |t, findx|ref, fin|
|00004000| 64 54 65 63 68 4e 6f 74 | 65 0d 2d 2d 0d 0d 66 75 |dTechNot|e.--..fu|
|00004010| 6e 63 74 69 6f 6e 20 70 | 72 69 6e 74 49 74 0d 69 |nction p|rintIt.i|
|00004020| 66 20 73 68 6f 72 74 20 | 6e 61 6d 65 20 6f 66 20 |f short |name of |
|00004030| 74 68 69 73 20 62 6b 67 | 6e 64 20 69 73 20 22 4d |this bkg|nd is "M|
|00004040| 61 69 6e 22 20 74 68 65 | 6e 0d 72 65 70 65 61 74 |ain" the|n.repeat|
|00004050| 20 77 69 74 68 20 69 20 | 3d 20 31 20 74 6f 20 32 | with i |= 1 to 2|
|00004060| 0d 70 75 74 20 6c 69 6e | 65 20 69 20 6f 66 20 62 |.put lin|e i of b|
|00004070| 67 20 66 6c 64 20 22 74 | 65 78 74 22 20 26 20 72 |g fld "t|ext" & r|
|00004080| 65 74 75 72 6e 20 61 66 | 74 65 72 20 70 68 65 61 |eturn af|ter phea|
|00004090| 64 65 72 0d 65 6e 64 20 | 72 65 70 65 61 74 0d 2d |der.end |repeat.-|
|000040a0| 2d 20 6d 75 6c 74 69 70 | 6c 65 20 63 61 72 64 73 |- multip|le cards|
|000040b0| 2c 20 69 66 20 73 6f 20 | 61 64 6a 75 73 74 20 70 |, if so |adjust p|
|000040c0| 61 67 65 20 78 20 6f 66 | 20 79 0d 69 66 20 63 68 |age x of| y.if ch|
|000040d0| 61 72 20 37 39 20 6f 66 | 20 6c 69 6e 65 20 31 20 |ar 79 of| line 1 |
|000040e0| 6f 66 20 70 68 65 61 64 | 65 72 20 ad 20 22 22 20 |of phead|er . "" |
|000040f0| 74 68 65 6e 0d 70 75 74 | 20 6f 66 66 73 65 74 28 |then.put| offset(|
|00004100| 22 20 20 20 20 20 22 2c | 6c 69 6e 65 20 31 20 6f |"     ",|line 1 o|
|00004110| 66 20 70 68 65 61 64 65 | 72 29 20 69 6e 74 6f 20 |f pheade|r) into |
|00004120| 77 68 69 74 65 70 6f 73 | 0d 70 75 74 20 6f 66 66 |whitepos|.put off|
|00004130| 73 65 74 28 22 63 61 72 | 64 20 22 2c 6c 69 6e 65 |set("car|d ",line|
|00004140| 20 31 20 6f 66 20 70 68 | 65 61 64 65 72 29 20 69 | 1 of ph|eader) i|
|00004150| 6e 74 6f 20 63 61 72 64 | 70 6f 73 0d 72 65 70 65 |nto card|pos.repe|
|00004160| 61 74 20 75 6e 74 69 6c | 20 6f 66 66 73 65 74 28 |at until| offset(|
|00004170| 22 63 61 72 64 22 2c 6c | 69 6e 65 20 31 20 6f 66 |"card",l|ine 1 of|
|00004180| 20 70 68 65 61 64 65 72 | 29 20 3d 20 28 63 61 72 | pheader|) = (car|
|00004190| 64 70 6f 73 20 2d 20 31 | 31 29 0d 64 65 6c 65 74 |dpos - 1|1).delet|
|000041a0| 65 20 63 68 61 72 20 77 | 68 69 74 65 70 6f 73 20 |e char w|hitepos |
|000041b0| 6f 66 20 6c 69 6e 65 20 | 31 20 6f 66 20 70 68 65 |of line |1 of phe|
|000041c0| 61 64 65 72 0d 65 6e 64 | 20 72 65 70 65 61 74 0d |ader.end| repeat.|
|000041d0| 65 6e 64 20 69 66 0d 70 | 75 74 20 6e 75 6d 54 6f |end if.p|ut numTo|
|000041e0| 43 68 61 72 28 33 30 29 | 20 26 20 6c 69 6e 65 20 |Char(30)| & line |
|000041f0| 31 20 6f 66 20 70 68 65 | 61 64 65 72 20 69 6e 74 |1 of phe|ader int|
|00004200| 6f 20 6c 69 6e 65 20 31 | 20 6f 66 20 70 68 65 61 |o line 1| of phea|
|00004210| 64 65 72 0d 70 75 74 20 | 62 67 20 66 6c 64 20 22 |der.put |bg fld "|
|00004220| 74 65 78 74 22 20 69 6e | 74 6f 20 70 62 6f 64 79 |text" in|to pbody|
|00004230| 0d 72 65 70 65 61 74 20 | 77 69 74 68 20 69 20 3d |.repeat |with i =|
|00004240| 20 31 20 74 6f 20 32 0d | 64 65 6c 65 74 65 20 6c | 1 to 2.|delete l|
|00004250| 69 6e 65 20 31 20 6f 66 | 20 70 62 6f 64 79 0d 65 |ine 1 of| pbody.e|
|00004260| 6e 64 20 72 65 70 65 61 | 74 0d 70 75 74 20 70 68 |nd repea|t.put ph|
|00004270| 65 61 64 65 72 20 26 20 | 72 65 74 75 72 6e 20 26 |eader & |return &|
|00004280| 20 70 62 6f 64 79 20 69 | 6e 74 6f 20 70 72 69 6e | pbody i|nto prin|
|00004290| 74 54 68 69 73 0d 65 6c | 73 65 0d 69 66 20 74 68 |tThis.el|se.if th|
|000042a0| 65 20 73 68 6f 72 74 20 | 6e 61 6d 65 20 6f 66 20 |e short |name of |
|000042b0| 74 68 69 73 20 63 61 72 | 64 20 69 73 20 22 4e 75 |this car|d is "Nu|
|000042c0| 6d 62 65 72 4c 69 73 74 | 69 6e 67 22 20 74 68 65 |mberList|ing" the|
|000042d0| 6e 0d 70 75 74 20 6e 75 | 6d 54 6f 43 68 61 72 28 |n.put nu|mToChar(|
|000042e0| 33 30 29 20 26 20 62 6b | 67 6e 64 20 66 69 65 6c |30) & bk|gnd fiel|
|000042f0| 64 20 33 20 26 20 72 65 | 74 75 72 6e c2 0d 26 20 |d 3 & re|turn..& |
|00004300| 63 61 72 64 20 66 69 65 | 6c 64 20 22 54 4f 43 22 |card fie|ld "TOC"|
|00004310| 20 69 6e 74 6f 20 70 72 | 69 6e 74 54 68 69 73 0d | into pr|intThis.|
|00004320| 65 6c 73 65 0d 69 66 20 | 62 6b 67 6e 64 20 66 69 |else.if |bkgnd fi|
|00004330| 65 6c 64 20 22 74 68 65 | 4c 69 73 74 22 20 69 73 |eld "the|List" is|
|00004340| 20 6e 6f 74 20 65 6d 70 | 74 79 20 74 68 65 6e 0d | not emp|ty then.|
|00004350| 70 75 74 20 6e 75 6d 54 | 6f 43 68 61 72 28 33 30 |put numT|oChar(30|
|00004360| 29 20 26 20 62 6b 67 6e | 64 20 66 69 65 6c 64 20 |) & bkgn|d field |
|00004370| 33 20 26 20 72 65 74 75 | 72 6e 20 26 20 72 65 74 |3 & retu|rn & ret|
|00004380| 75 72 6e c2 0d 26 20 6e | 75 6d 54 6f 43 68 61 72 |urn..& n|umToChar|
|00004390| 28 33 30 29 20 26 20 62 | 6b 67 6e 64 20 66 69 65 |(30) & b|kgnd fie|
|000043a0| 6c 64 20 22 73 75 62 6a | 65 63 74 22 20 26 20 72 |ld "subj|ect" & r|
|000043b0| 65 74 75 72 6e c2 0d 26 | 20 62 6b 67 6e 64 20 66 |eturn..&| bkgnd f|
|000043c0| 69 65 6c 64 20 22 74 68 | 65 4c 69 73 74 22 20 69 |ield "th|eList" i|
|000043d0| 6e 74 6f 20 70 72 69 6e | 74 54 68 69 73 0d 65 6c |nto prin|tThis.el|
|000043e0| 73 65 0d 65 78 69 74 20 | 70 72 69 6e 74 49 74 0d |se.exit |printIt.|
|000043f0| 65 6e 64 20 69 66 0d 65 | 6e 64 20 69 66 0d 65 6e |end if.e|nd if.en|
|00004400| 64 20 69 66 0d 70 72 69 | 6e 74 4f 75 74 20 70 72 |d if.pri|ntOut pr|
|00004410| 69 6e 74 54 68 69 73 2c | 22 63 6f 75 72 69 65 72 |intThis,|"courier|
|00004420| 22 2c 31 30 2c 22 70 6c | 61 69 6e 22 2c 22 74 72 |",10,"pl|ain","tr|
|00004430| 75 65 22 2c 22 62 6f 6c | 64 22 0d 72 65 74 75 72 |ue","bol|d".retur|
|00004440| 6e 20 28 74 68 65 20 72 | 65 73 75 6c 74 29 0d 65 |n (the r|esult).e|
|00004450| 6e 64 20 70 72 69 6e 74 | 49 74 0d 0d 2d 2d 2d 2d |nd print|It..----|
|00004460| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004470| 2d 2d 0d 2d 2d 20 66 69 | 6e 64 78 72 65 66 20 66 |--.-- fi|ndxref f|
|00004480| 75 6e 63 74 69 6f 6e 0d | 2d 2d 20 20 64 65 61 6c |unction.|--  deal|
|00004490| 73 20 77 69 74 68 20 72 | 65 71 75 65 73 74 73 20 |s with r|equests |
|000044a0| 66 72 6f 6d 20 74 68 65 | 20 73 74 61 63 6b 20 66 |from the| stack f|
|000044b0| 6f 72 20 61 20 70 61 72 | 74 69 63 75 6c 61 72 20 |or a par|ticular |
|000044c0| 78 72 65 66 20 70 61 74 | 68 0d 2d 2d 2d 2d 2d 2d |xref pat|h.------|
|000044d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000044e0| 0d 0d 66 75 6e 63 74 69 | 6f 6e 20 66 69 6e 64 78 |..functi|on findx|
|000044f0| 72 65 66 20 77 68 69 63 | 68 0d 67 6c 6f 62 61 6c |ref whic|h.global|
|00004500| 20 78 72 65 66 76 61 6c | 75 65 0d 70 75 74 20 65 | xrefval|ue.put e|
|00004510| 6d 70 74 79 20 69 6e 74 | 6f 20 78 72 65 66 76 61 |mpty int|o xrefva|
|00004520| 6c 75 65 0d 6c 6f 63 6b | 20 73 63 72 65 65 6e 0d |lue.lock| screen.|
|00004530| 70 75 73 68 20 63 61 72 | 64 0d 67 6f 20 63 61 72 |push car|d.go car|
|00004540| 64 20 69 64 20 38 32 31 | 33 33 0d 69 66 20 77 68 |d id 821|33.if wh|
|00004550| 69 63 68 20 3d 20 22 54 | 4e 53 74 61 63 6b 50 61 |ich = "T|NStackPa|
|00004560| 74 68 22 20 74 68 65 6e | 0d 69 66 20 63 64 20 66 |th" then|.if cd f|
|00004570| 6c 64 20 22 54 4e 53 74 | 61 63 6b 50 61 74 68 22 |ld "TNSt|ackPath"|
|00004580| 20 69 73 20 65 6d 70 74 | 79 20 74 68 65 6e 0d 73 | is empt|y then.s|
|00004590| 65 6e 64 20 6d 6f 75 73 | 65 55 70 20 74 6f 20 63 |end mous|eUp to c|
|000045a0| 64 20 62 74 6e 20 35 0d | 70 75 74 20 63 64 20 66 |d btn 5.|put cd f|
|000045b0| 6c 64 20 22 54 4e 53 74 | 61 63 6b 50 61 74 68 22 |ld "TNSt|ackPath"|
|000045c0| 20 69 6e 74 6f 20 78 72 | 65 66 76 61 6c 75 65 0d | into xr|efvalue.|
|000045d0| 65 6c 73 65 0d 70 75 74 | 20 63 64 20 66 6c 64 20 |else.put| cd fld |
|000045e0| 22 54 4e 53 74 61 63 6b | 50 61 74 68 22 20 69 6e |"TNStack|Path" in|
|000045f0| 74 6f 20 78 72 65 66 76 | 61 6c 75 65 0d 65 6e 64 |to xrefv|alue.end|
|00004600| 20 69 66 0d 2d 2d 0d 65 | 6c 73 65 0d 69 66 20 77 | if.--.e|lse.if w|
|00004610| 68 69 63 68 20 3d 20 22 | 53 4d 53 74 61 63 6b 50 |hich = "|SMStackP|
|00004620| 61 74 68 22 20 74 68 65 | 6e 0d 69 66 20 63 64 20 |ath" the|n.if cd |
|00004630| 66 6c 64 20 22 53 4d 53 | 74 61 63 6b 50 61 74 68 |fld "SMS|tackPath|
|00004640| 22 20 69 73 20 65 6d 70 | 74 79 20 74 68 65 6e 0d |" is emp|ty then.|
|00004650| 73 65 6e 64 20 6d 6f 75 | 73 65 55 70 20 74 6f 20 |send mou|seUp to |
|00004660| 63 64 20 62 74 6e 20 36 | 0d 70 75 74 20 63 64 20 |cd btn 6|.put cd |
|00004670| 66 6c 64 20 22 53 4d 53 | 74 61 63 6b 50 61 74 68 |fld "SMS|tackPath|
|00004680| 22 20 69 6e 74 6f 20 78 | 72 65 66 76 61 6c 75 65 |" into x|refvalue|
|00004690| 0d 65 6c 73 65 0d 70 75 | 74 20 63 64 20 66 6c 64 |.else.pu|t cd fld|
|000046a0| 20 22 53 4d 53 74 61 63 | 6b 50 61 74 68 22 20 69 | "SMStac|kPath" i|
|000046b0| 6e 74 6f 20 78 72 65 66 | 76 61 6c 75 65 0d 65 6e |nto xref|value.en|
|000046c0| 64 20 69 66 0d 2d 2d 0d | 65 6c 73 65 0d 69 66 20 |d if.--.|else.if |
|000046d0| 77 68 69 63 68 20 3d 20 | 22 49 4d 36 53 74 61 63 |which = |"IM6Stac|
|000046e0| 6b 50 61 74 68 22 20 74 | 68 65 6e 0d 69 66 20 63 |kPath" t|hen.if c|
|000046f0| 64 20 66 6c 64 20 22 49 | 4d 36 53 74 61 63 6b 50 |d fld "I|M6StackP|
|00004700| 61 74 68 22 20 69 73 20 | 65 6d 70 74 79 20 74 68 |ath" is |empty th|
|00004710| 65 6e 0d 73 65 6e 64 20 | 6d 6f 75 73 65 55 70 20 |en.send |mouseUp |
|00004720| 74 6f 20 63 64 20 62 74 | 6e 20 31 30 0d 70 75 74 |to cd bt|n 10.put|
|00004730| 20 63 64 20 66 6c 64 20 | 22 49 4d 36 53 74 61 63 | cd fld |"IM6Stac|
|00004740| 6b 50 61 74 68 22 20 69 | 6e 74 6f 20 78 72 65 66 |kPath" i|nto xref|
|00004750| 76 61 6c 75 65 0d 65 6c | 73 65 0d 70 75 74 20 63 |value.el|se.put c|
|00004760| 64 20 66 6c 64 20 22 49 | 4d 36 53 74 61 63 6b 50 |d fld "I|M6StackP|
|00004770| 61 74 68 22 20 69 6e 74 | 6f 20 78 72 65 66 76 61 |ath" int|o xrefva|
|00004780| 6c 75 65 0d 65 6e 64 20 | 69 66 0d 2d 2d 0d 65 6c |lue.end |if.--.el|
|00004790| 73 65 0d 69 66 20 77 68 | 69 63 68 20 3d 20 22 51 |se.if wh|ich = "Q|
|000047a0| 41 53 74 61 63 6b 50 61 | 74 68 22 20 74 68 65 6e |AStackPa|th" then|
|000047b0| 0d 69 66 20 63 64 20 66 | 6c 64 20 22 51 41 53 74 |.if cd f|ld "QASt|
|000047c0| 61 63 6b 50 61 74 68 22 | 20 69 73 20 65 6d 70 74 |ackPath"| is empt|
|000047d0| 79 20 74 68 65 6e 0d 73 | 65 6e 64 20 6d 6f 75 73 |y then.s|end mous|
|000047e0| 65 55 70 20 74 6f 20 63 | 64 20 62 74 6e 20 37 0d |eUp to c|d btn 7.|
|000047f0| 70 75 74 20 63 64 20 66 | 6c 64 20 22 51 41 53 74 |put cd f|ld "QASt|
|00004800| 61 63 6b 50 61 74 68 22 | 20 69 6e 74 6f 20 78 72 |ackPath"| into xr|
|00004810| 65 66 76 61 6c 75 65 0d | 65 6c 73 65 0d 70 75 74 |efvalue.|else.put|
|00004820| 20 63 64 20 66 6c 64 20 | 22 51 41 53 74 61 63 6b | cd fld |"QAStack|
|00004830| 50 61 74 68 22 20 69 6e | 74 6f 20 78 72 65 66 76 |Path" in|to xrefv|
|00004840| 61 6c 75 65 0d 65 6e 64 | 20 69 66 0d 2d 2d 0d 65 |alue.end| if.--.e|
|00004850| 6c 73 65 0d 69 66 20 77 | 68 69 63 68 20 3d 20 22 |lse.if w|hich = "|
|00004860| 51 53 74 61 63 6b 50 61 | 74 68 22 20 74 68 65 6e |QStackPa|th" then|
|00004870| 0d 69 66 20 63 64 20 66 | 6c 64 20 22 51 53 74 61 |.if cd f|ld "QSta|
|00004880| 63 6b 50 61 74 68 22 20 | 69 73 20 65 6d 70 74 79 |ckPath" |is empty|
|00004890| 20 74 68 65 6e 0d 73 65 | 6e 64 20 6d 6f 75 73 65 | then.se|nd mouse|
|000048a0| 55 70 20 74 6f 20 63 64 | 20 62 74 6e 20 38 0d 70 |Up to cd| btn 8.p|
|000048b0| 75 74 20 63 64 20 66 6c | 64 20 22 51 53 74 61 63 |ut cd fl|d "QStac|
|000048c0| 6b 50 61 74 68 22 20 69 | 6e 74 6f 20 78 72 65 66 |kPath" i|nto xref|
|000048d0| 76 61 6c 75 65 0d 65 6c | 73 65 0d 70 75 74 20 63 |value.el|se.put c|
|000048e0| 64 20 66 6c 64 20 22 51 | 53 74 61 63 6b 50 61 74 |d fld "Q|StackPat|
|000048f0| 68 22 20 69 6e 74 6f 20 | 78 72 65 66 76 61 6c 75 |h" into |xrefvalu|
|00004900| 65 0d 65 6e 64 20 69 66 | 0d 2d 2d 0d 65 6c 73 65 |e.end if|.--.else|
|00004910| 0d 69 66 20 77 68 69 63 | 68 20 3d 20 22 48 49 4e |.if whic|h = "HIN|
|00004920| 53 74 61 63 6b 50 61 74 | 68 22 20 74 68 65 6e 0d |StackPat|h" then.|
|00004930| 69 66 20 63 64 20 66 6c | 64 20 22 48 49 4e 53 74 |if cd fl|d "HINSt|
|00004940| 61 63 6b 50 61 74 68 22 | 20 69 73 20 65 6d 70 74 |ackPath"| is empt|
|00004950| 79 20 74 68 65 6e 0d 73 | 65 6e 64 20 6d 6f 75 73 |y then.s|end mous|
|00004960| 65 55 70 20 74 6f 20 63 | 64 20 62 74 6e 20 39 0d |eUp to c|d btn 9.|
|00004970| 70 75 74 20 63 64 20 66 | 6c 64 20 22 48 49 4e 53 |put cd f|ld "HINS|
|00004980| 74 61 63 6b 50 61 74 68 | 22 20 69 6e 74 6f 20 78 |tackPath|" into x|
|00004990| 72 65 66 76 61 6c 75 65 | 0d 65 6c 73 65 0d 70 75 |refvalue|.else.pu|
|000049a0| 74 20 63 64 20 66 6c 64 | 20 22 48 49 4e 53 74 61 |t cd fld| "HINSta|
|000049b0| 63 6b 50 61 74 68 22 20 | 69 6e 74 6f 20 78 72 65 |ckPath" |into xre|
|000049c0| 66 76 61 6c 75 65 0d 65 | 6e 64 20 69 66 0d 2d 2d |fvalue.e|nd if.--|
|000049d0| 0d 65 6c 73 65 0d 69 66 | 20 77 68 69 63 68 20 3d |.else.if| which =|
|000049e0| 20 22 53 74 61 63 6b 50 | 69 63 74 50 61 74 68 22 | "StackP|ictPath"|
|000049f0| 20 74 68 65 6e 0d 69 66 | 20 63 64 20 66 6c 64 20 | then.if| cd fld |
|00004a00| 22 53 74 61 63 6b 50 69 | 63 74 50 61 74 68 22 20 |"StackPi|ctPath" |
|00004a10| 69 73 20 65 6d 70 74 79 | 20 74 68 65 6e 0d 73 65 |is empty| then.se|
|00004a20| 6e 64 20 6d 6f 75 73 65 | 55 70 20 74 6f 20 63 64 |nd mouse|Up to cd|
|00004a30| 20 62 74 6e 20 31 31 0d | 70 75 74 20 63 64 20 66 | btn 11.|put cd f|
|00004a40| 6c 64 20 22 53 74 61 63 | 6b 50 69 63 74 50 61 74 |ld "Stac|kPictPat|
|00004a50| 68 22 20 69 6e 74 6f 20 | 78 72 65 66 76 61 6c 75 |h" into |xrefvalu|
|00004a60| 65 0d 65 6c 73 65 0d 70 | 75 74 20 63 64 20 66 6c |e.else.p|ut cd fl|
|00004a70| 64 20 22 53 74 61 63 6b | 50 69 63 74 50 61 74 68 |d "Stack|PictPath|
|00004a80| 22 20 69 6e 74 6f 20 78 | 72 65 66 76 61 6c 75 65 |" into x|refvalue|
|00004a90| 0d 65 6e 64 20 69 66 0d | 2d 2d 0d 65 6c 73 65 0d |.end if.|--.else.|
|00004aa0| 69 66 20 77 68 69 63 68 | 20 3d 20 22 53 74 61 63 |if which| = "Stac|
|00004ab0| 6b 49 6e 64 65 78 50 61 | 74 68 22 20 74 68 65 6e |kIndexPa|th" then|
|00004ac0| 0d 69 66 20 63 64 20 66 | 6c 64 20 22 53 74 61 63 |.if cd f|ld "Stac|
|00004ad0| 6b 49 6e 64 65 78 50 61 | 74 68 22 20 69 73 20 65 |kIndexPa|th" is e|
|00004ae0| 6d 70 74 79 20 74 68 65 | 6e 0d 73 65 6e 64 20 6d |mpty the|n.send m|
|00004af0| 6f 75 73 65 55 70 20 74 | 6f 20 63 64 20 62 74 6e |ouseUp t|o cd btn|
|00004b00| 20 31 32 0d 70 75 74 20 | 63 64 20 66 6c 64 20 22 | 12.put |cd fld "|
|00004b10| 53 74 61 63 6b 49 6e 64 | 65 78 50 61 74 68 22 20 |StackInd|exPath" |
|00004b20| 69 6e 74 6f 20 78 72 65 | 66 76 61 6c 75 65 0d 65 |into xre|fvalue.e|
|00004b30| 6c 73 65 0d 70 75 74 20 | 63 64 20 66 6c 64 20 22 |lse.put |cd fld "|
|00004b40| 53 74 61 63 6b 49 6e 64 | 65 78 50 61 74 68 22 20 |StackInd|exPath" |
|00004b50| 69 6e 74 6f 20 78 72 65 | 66 76 61 6c 75 65 0d 65 |into xre|fvalue.e|
|00004b60| 6e 64 20 69 66 0d 2d 2d | 0d 65 6c 73 65 0d 62 65 |nd if.--|.else.be|
|00004b70| 65 70 0d 61 6e 73 77 65 | 72 20 22 58 2d 52 65 66 |ep.answe|r "X-Ref|
|00004b80| 65 72 65 6e 63 65 20 75 | 6e 6b 6e 6f 77 6e 20 69 |erence u|nknown i|
|00004b90| 6e 20 74 68 69 73 20 76 | 65 72 73 69 6f 6e 22 0d |n this v|ersion".|
|00004ba0| 65 6e 64 20 69 66 0d 65 | 6e 64 20 69 66 0d 65 6e |end if.e|nd if.en|
|00004bb0| 64 20 69 66 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |d if.end| if.end |
|00004bc0| 69 66 0d 65 6e 64 20 69 | 66 0d 65 6e 64 20 69 66 |if.end i|f.end if|
|00004bd0| 0d 65 6e 64 20 69 66 0d | 2d 2d 0d 70 6f 70 20 63 |.end if.|--.pop c|
|00004be0| 61 72 64 0d 75 6e 6c 6f | 63 6b 20 73 63 72 65 65 |ard.unlo|ck scree|
|00004bf0| 6e 0d 2d 2d 0d 72 65 74 | 75 72 6e 20 78 72 65 66 |n.--.ret|urn xref|
|00004c00| 76 61 6c 75 65 0d 65 6e | 64 20 66 69 6e 64 78 72 |value.en|d findxr|
|00004c10| 65 66 0d 0d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ef..----|--------|
|00004c20| 2d 2d 2d 2d 2d 0d 2d 2d | 20 66 69 6e 64 54 65 63 |-----.--| findTec|
|00004c30| 68 4e 6f 74 65 20 66 75 | 6e 63 74 69 6f 6e 0d 2d |hNote fu|nction.-|
|00004c40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c50| 0d 2d 2d 20 74 68 69 73 | 20 66 75 6e 63 74 69 6f |.-- this| functio|
|00004c60| 6e 20 72 65 74 75 72 6e | 73 20 74 68 65 20 63 61 |n return|s the ca|
|00004c70| 72 64 20 6e 75 6d 62 65 | 72 20 66 6f 72 20 61 20 |rd numbe|r for a |
|00004c80| 67 69 76 65 6e 0d 2d 2d | 20 54 65 63 68 6e 69 63 |given.--| Technic|
|00004c90| 61 6c 20 4e 6f 74 65 20 | 23 20 6f 72 20 65 6d 70 |al Note |# or emp|
|00004ca0| 74 79 20 69 66 20 6e 6f | 74 20 66 6f 75 6e 64 0d |ty if no|t found.|
|00004cb0| 2d 2d 0d 66 75 6e 63 74 | 69 6f 6e 20 66 69 6e 64 |--.funct|ion find|
|00004cc0| 54 65 63 68 4e 6f 74 65 | 20 77 68 69 63 68 0d 67 |TechNote| which.g|
|00004cd0| 6c 6f 62 61 6c 20 68 6f | 6d 65 74 6f 0d 70 75 74 |lobal ho|meto.put|
|00004ce0| 20 65 6d 70 74 79 20 69 | 6e 74 6f 20 77 68 69 63 | empty i|nto whic|
|00004cf0| 68 43 61 72 64 0d 6c 6f | 63 6b 20 73 63 72 65 65 |hCard.lo|ck scree|
|00004d00| 6e 0d 73 65 74 20 6c 6f | 63 6b 4d 65 73 73 61 67 |n.set lo|ckMessag|
|00004d10| 65 73 20 74 6f 20 74 72 | 75 65 0d 70 75 73 68 20 |es to tr|ue.push |
|00004d20| 63 61 72 64 0d 67 6f 20 | 63 61 72 64 20 69 64 20 |card.go |card id |
|00004d30| 32 33 39 32 31 20 2d 2d | 20 4e 75 6d 62 65 72 4c |23921 --| NumberL|
|00004d40| 69 73 74 69 6e 67 0d 69 | 66 20 77 68 69 63 68 20 |isting.i|f which |
|00004d50| 69 73 20 6e 6f 74 20 65 | 6d 70 74 79 20 74 68 65 |is not e|mpty the|
|00004d60| 6e 0d 70 75 74 20 74 68 | 65 20 6e 75 6d 62 65 72 |n.put th|e number|
|00004d70| 20 6f 66 20 66 69 72 73 | 74 20 63 61 72 64 20 69 | of firs|t card i|
|00004d80| 6e 20 62 67 20 22 4d 61 | 69 6e 22 20 69 6e 74 6f |n bg "Ma|in" into|
|00004d90| 20 66 0d 70 75 74 20 22 | 30 30 30 22 20 62 65 66 | f.put "|000" bef|
|00004da0| 6f 72 65 20 77 68 69 63 | 68 20 20 20 20 20 2d 2d |ore whic|h     --|
|00004db0| 20 61 64 64 20 6c 65 61 | 64 69 6e 67 20 7a 65 72 | add lea|ding zer|
|00004dc0| 6f 65 73 20 69 66 20 6e | 65 65 64 65 64 0d 64 65 |oes if n|eeded.de|
|00004dd0| 6c 65 74 65 20 63 68 61 | 72 20 31 20 74 6f 20 28 |lete cha|r 1 to (|
|00004de0| 6c 65 6e 67 74 68 28 77 | 68 69 63 68 29 20 2d 20 |length(w|hich) - |
|00004df0| 33 29 20 6f 66 20 77 68 | 69 63 68 0d 69 66 20 77 |3) of wh|ich.if w|
|00004e00| 68 69 63 68 20 3d 20 22 | 30 30 30 22 20 74 68 65 |hich = "|000" the|
|00004e10| 6e 20 20 20 20 20 20 2d | 2d 20 73 70 65 63 69 61 |n      -|- specia|
|00004e20| 6c 20 63 61 73 65 20 61 | 74 20 73 74 61 72 74 20 |l case a|t start |
|00004e30| 6f 66 20 66 69 65 6c 64 | 0d 70 75 74 20 66 20 69 |of field|.put f i|
|00004e40| 6e 74 6f 20 77 68 69 63 | 68 43 61 72 64 0d 65 6c |nto whic|hCard.el|
|00004e50| 73 65 0d 70 75 74 20 72 | 65 74 75 72 6e 20 62 65 |se.put r|eturn be|
|00004e60| 66 6f 72 65 20 77 68 69 | 63 68 0d 67 65 74 20 6f |fore whi|ch.get o|
|00004e70| 66 66 73 65 74 28 77 68 | 69 63 68 2c 20 63 64 20 |ffset(wh|ich, cd |
|00004e80| 66 6c 64 20 22 54 4f 43 | 22 29 0d 69 66 20 69 74 |fld "TOC|").if it|
|00004e90| 20 ad 20 30 20 74 68 65 | 6e 0d 70 75 74 20 73 63 | . 0 the|n.put sc|
|00004ea0| 72 6f 6c 6c 20 6f 66 20 | 63 64 20 66 6c 64 20 22 |roll of |cd fld "|
|00004eb0| 54 4f 43 22 20 69 6e 74 | 6f 20 73 0d 73 65 6c 65 |TOC" int|o s.sele|
|00004ec0| 63 74 20 63 68 61 72 20 | 28 69 74 2b 31 29 20 74 |ct char |(it+1) t|
|00004ed0| 6f 20 28 69 74 2b 32 29 | 20 6f 66 20 63 64 20 66 |o (it+2)| of cd f|
|00004ee0| 6c 64 20 22 54 4f 43 22 | 0d 67 65 74 20 77 6f 72 |ld "TOC"|.get wor|
|00004ef0| 64 20 32 20 6f 66 20 74 | 68 65 20 73 65 6c 65 63 |d 2 of t|he selec|
|00004f00| 74 65 64 4c 69 6e 65 0d | 73 65 74 20 73 63 72 6f |tedLine.|set scro|
|00004f10| 6c 6c 20 6f 66 20 63 64 | 20 66 6c 64 20 22 54 4f |ll of cd| fld "TO|
|00004f20| 43 22 20 74 6f 20 73 0d | 70 75 74 20 66 20 2b 20 |C" to s.|put f + |
|00004f30| 69 74 20 2d 20 31 20 69 | 6e 74 6f 20 77 68 69 63 |it - 1 i|nto whic|
|00004f40| 68 43 61 72 64 0d 65 6e | 64 20 69 66 0d 65 6e 64 |hCard.en|d if.end|
|00004f50| 20 69 66 0d 65 6e 64 20 | 69 66 0d 70 6f 70 20 63 | if.end |if.pop c|
|00004f60| 61 72 64 0d 2d 2d 0d 73 | 65 74 20 6c 6f 63 6b 4d |ard.--.s|et lockM|
|00004f70| 65 73 73 61 67 65 73 20 | 74 6f 20 66 61 6c 73 65 |essages |to false|
|00004f80| 0d 75 6e 6c 6f 63 6b 20 | 73 63 72 65 65 6e 0d 72 |.unlock |screen.r|
|00004f90| 65 74 75 72 6e 20 77 68 | 69 63 68 43 61 72 64 0d |eturn wh|ichCard.|
|00004fa0| 65 6e 64 20 66 69 6e 64 | 54 65 63 68 4e 6f 74 65 |end find|TechNote|
|00004fb0| 0d 0d 0d 2d 2d 20 6d 6f | 64 69 66 69 65 64 20 70 |...-- mo|dified p|
|00004fc0| 6a 66 20 31 2f 37 2f 39 | 31 0d 67 65 74 20 75 73 |jf 1/7/9|1.get us|
|00004fd0| 65 72 6c 65 76 65 6c 0d | 69 66 20 69 74 20 69 73 |erlevel.|if it is|
|00004fe0| 20 32 20 74 68 65 6e 20 | 73 65 74 20 75 73 65 72 | 2 then |set user|
|00004ff0| 6c 65 76 65 6c 20 74 6f | 20 31 0d 2d 2d 20 65 6e |level to| 1.-- en|
|00005000| 64 20 6d 6f 64 69 66 79 | 20 70 6a 66 20 31 2f 37 |d modify| pjf 1/7|
|00005010| 2f 39 31 0d 6f 70 65 6e | 62 61 63 6b 67 72 6f 75 |/91.open|backgrou|
|00005020| 6e 64 0d 6f 70 65 6e 63 | 61 72 64 0d 65 6e 64 20 |nd.openc|ard.end |
|00005030| 54 72 75 6e 63 46 69 6c | 65 0d 0d 6f 6e 20 64 6f |TruncFil|e..on do|
|00005040| 4d 65 6e 75 20 77 68 69 | 63 68 0d 69 66 20 77 68 |Menu whi|ch.if wh|
|00005050| 69 63 68 20 69 73 20 22 | 42 61 63 6b 22 20 74 68 |ich is "|Back" th|
|00005060| 65 6e 0d 70 6f 70 20 63 | 64 0d 65 6c 73 65 0d 70 |en.pop c|d.else.p|
|00005070| 61 73 73 20 64 6f 4d 65 | 6e 75 0d 65 6e 64 20 69 |ass doMe|nu.end i|
|00005080| 66 0d 65 6e 64 20 64 6f | 4d 65 6e 75 0d 0d 6f 6e |f.end do|Menu..on|
|00005090| 20 67 6f 53 65 61 72 63 | 68 53 4b 42 0d 67 6c 6f | goSearc|hSKB.glo|
|000050a0| 62 61 6c 20 77 68 65 72 | 65 53 4b 42 0d 69 66 20 |bal wher|eSKB.if |
|000050b0| 74 68 65 72 65 20 69 73 | 20 61 20 77 69 6e 64 6f |there is| a windo|
|000050c0| 77 20 22 53 65 61 72 63 | 68 20 4b 6e 6f 77 6c 65 |w "Searc|h Knowle|
|000050d0| 64 67 65 20 42 61 73 65 | 22 20 74 68 65 6e 20 2d |dge Base|" then -|
|000050e0| 2d 20 49 46 20 41 4c 52 | 45 41 44 59 20 4f 50 45 |- IF ALR|EADY OPE|
|000050f0| 4e 0d 73 68 6f 77 20 77 | 69 6e 64 6f 77 20 22 53 |N.show w|indow "S|
|00005100| 65 61 72 63 68 20 4b 6e | 6f 77 6c 65 64 67 65 20 |earch Kn|owledge |
|00005110| 42 61 73 65 22 0d 65 6c | 73 65 20 69 66 20 77 68 |Base".el|se if wh|
|00005120| 65 72 65 53 4b 42 20 69 | 73 20 6e 6f 74 20 65 6d |ereSKB i|s not em|
|00005130| 70 74 79 20 74 68 65 6e | 0d 67 6f 20 77 68 65 72 |pty then|.go wher|
|00005140| 65 53 4b 42 20 69 6e 20 | 61 20 6e 65 77 20 77 69 |eSKB in |a new wi|
|00005150| 6e 64 6f 77 0d 65 6c 73 | 65 0d 70 75 74 20 74 68 |ndow.els|e.put th|
|00005160| 69 73 46 6f 6c 64 65 72 | 28 29 20 26 20 22 53 65 |isFolder|() & "Se|
|00005170| 61 72 63 68 20 4b 6e 6f | 77 6c 65 64 67 65 20 42 |arch Kno|wledge B|
|00005180| 61 73 65 22 20 69 6e 74 | 6f 20 6c 6f 63 61 6c 4e |ase" int|o localN|
|00005190| 61 6d 65 0d 69 66 20 74 | 68 65 72 65 20 69 73 20 |ame.if t|here is |
|000051a0| 61 20 66 69 6c 65 20 6c | 6f 63 61 6c 4e 61 6d 65 |a file l|ocalName|
|000051b0| 20 74 68 65 6e 20 2d 2d | 20 49 4e 20 43 55 52 52 | then --| IN CURR|
|000051c0| 45 4e 54 20 46 4f 4c 44 | 45 52 0d 67 6f 20 73 74 |ENT FOLD|ER.go st|
|000051d0| 61 63 6b 20 6c 6f 63 61 | 6c 4e 61 6d 65 20 69 6e |ack loca|lName in|
|000051e0| 20 6e 65 77 20 77 69 6e | 64 6f 77 0d 65 6c 73 65 | new win|dow.else|
|000051f0| 20 2d 2d 20 43 48 45 43 | 4b 20 4f 4e 20 44 45 56 | -- CHEC|K ON DEV|
|00005200| 2e 43 44 0d 67 65 74 20 | 22 44 65 76 2e 43 44 20 |.CD.get |"Dev.CD |
|00005210| 56 6f 6c 2e 20 56 49 49 | 3a 53 65 61 72 63 68 20 |Vol. VII|:Search |
|00005220| 4b 6e 6f 77 6c 65 64 67 | 65 20 42 61 73 65 20 53 |Knowledg|e Base S|
|00005230| 74 61 63 6b 3a 53 65 61 | 72 63 68 20 4b 6e 6f 77 |tack:Sea|rch Know|
|00005240| 6c 65 64 67 65 20 42 61 | 73 65 22 0d 69 66 20 74 |ledge Ba|se".if t|
|00005250| 68 65 72 65 20 69 73 20 | 61 20 66 69 6c 65 20 69 |here is |a file i|
|00005260| 74 20 74 68 65 6e 0d 67 | 6f 20 73 74 61 63 6b 20 |t then.g|o stack |
|00005270| 69 74 20 69 6e 20 6e 65 | 77 20 77 69 6e 64 6f 77 |it in ne|w window|
|00005280| 0d 65 6c 73 65 20 67 6f | 20 73 74 61 63 6b 20 22 |.else go| stack "|
|00005290| 53 65 61 72 63 68 20 4b | 6e 6f 77 6c 65 64 67 65 |Search K|nowledge|
|000052a0| 20 42 61 73 65 22 20 69 | 6e 20 6e 65 77 20 77 69 | Base" i|n new wi|
|000052b0| 6e 64 6f 77 20 2d 2d 20 | 4c 41 53 54 20 52 45 53 |ndow -- |LAST RES|
|000052c0| 4f 52 54 20 41 53 4b 20 | 57 48 45 52 45 0d 65 6e |ORT ASK |WHERE.en|
|000052d0| 64 20 69 66 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |d if.end| if.end |
|000052e0| 67 6f 53 65 61 72 63 68 | 53 4b 42 0d 0d 66 75 6e |goSearch|SKB..fun|
|000052f0| 63 74 69 6f 6e 20 74 68 | 69 73 46 6f 6c 64 65 72 |ction th|isFolder|
|00005300| 0d 67 65 74 20 74 68 65 | 20 6c 6f 6e 67 20 6e 61 |.get the| long na|
|00005310| 6d 65 20 6f 66 20 74 68 | 69 73 20 73 74 61 63 6b |me of th|is stack|
|00005320| 0d 64 65 6c 65 74 65 20 | 63 68 61 72 20 31 20 74 |.delete |char 1 t|
|00005330| 6f 20 37 20 6f 66 20 69 | 74 0d 72 65 70 65 61 74 |o 7 of i|t.repeat|
|00005340| 20 77 69 74 68 20 69 20 | 3d 20 6c 65 6e 67 74 68 | with i |= length|
|00005350| 28 69 74 29 20 64 6f 77 | 6e 20 74 6f 20 31 0d 69 |(it) dow|n to 1.i|
|00005360| 66 20 63 68 61 72 20 69 | 20 6f 66 20 69 74 20 3d |f char i| of it =|
|00005370| 20 22 3a 22 20 74 68 65 | 6e 20 65 78 69 74 20 72 | ":" the|n exit r|
|00005380| 65 70 65 61 74 0d 65 6e | 64 20 72 65 70 65 61 74 |epeat.en|d repeat|
|00005390| 0d 72 65 74 75 72 6e 20 | 63 68 61 72 20 31 20 74 |.return |char 1 t|
|000053a0| 6f 20 69 20 6f 66 20 69 | 74 0d 65 6e 64 20 74 68 |o i of i|t.end th|
|000053b0| 69 73 46 6f 6c 64 65 72 | 0d 00 69 74 20 72 65 70 |isFolder|..it rep|
|000053c0| 65 61 74 0d 65 6e 64 20 | 72 65 70 65 61 74 0d 72 |eat.end |repeat.r|
|000053d0| 65 74 75 72 6e 20 63 68 | 61 72 20 31 20 74 6f 20 |eturn ch|ar 1 to |
|000053e0| 69 20 6f 66 20 69 74 0d | 65 6e 64 20 74 68 69 73 |i of it.|end this|
|000053f0| 46 6f 6c 64 65 72 0d 00 | 66 20 69 74 0d 72 65 70 |Folder..|f it.rep|
|00005400| 65 61 74 20 77 69 74 68 | 20 69 20 3d 20 6c 65 6e |eat with| i = len|
|00005410| 67 74 68 28 69 74 29 20 | 64 6f 77 6e 20 74 6f 20 |gth(it) |down to |
|00005420| 31 0d 69 66 20 63 68 61 | 72 20 69 20 6f 66 20 69 |1.if cha|r i of i|
|00005430| 74 20 3d 20 22 3a 22 20 | 74 68 65 6e 20 65 78 69 |t = ":" |then exi|
|00005440| 74 20 72 65 70 65 61 74 | 0d 65 6e 64 20 72 65 70 |t repeat|.end rep|
|00005450| 65 61 74 0d 72 65 74 75 | 72 6e 20 63 68 61 72 20 |eat.retu|rn char |
|00005460| 31 20 74 6f 20 69 20 6f | 66 20 69 74 0d 65 6e 64 |1 to i o|f it.end|
|00005470| 20 74 68 69 73 46 6f 6c | 64 65 72 0d 00 00 00 00 | thisFol|der.....|
|00005480| 00 00 06 00 4d 41 53 54 | ff ff ff ff 00 00 00 00 |....MAST|........|
|00005490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000054a0| 00 8c 23 2b 00 21 6f 1f | 00 08 16 97 00 32 b5 0b |..#+.!o.|.....2..|
|000054b0| 00 ad ab 53 00 1d 1e 1d | 00 1e 53 f1 00 09 e7 27 |...S....|..S....'|
|000054c0| 00 1e 8e 5a 00 1e cd f8 | 00 1f 09 cb 00 1f 48 56 |...Z....|......HV|
|000054d0| 00 1f c8 04 00 20 42 f6 | 00 e7 2f cc 00 e8 66 93 |..... B.|../...f.|
|000054e0| 00 ea 2d 23 00 21 d3 e6 | 00 21 e7 33 00 21 f7 06 |..-#.!..|.!.3.!..|
|000054f0| 00 22 0a 8a 00 22 1e c2 | 00 21 90 1a 00 22 b0 41 |."..."..|.!...".A|
|00005500| 00 23 fa 35 00 25 81 54 | 00 25 98 fc 00 26 0a ea |.#.5.%.T|.%...&..|
|00005510| 00 26 69 7c 00 26 b3 7a | 00 eb b6 b7 00 8f 4e e5 |.&i|.&.z|......N.|
|00005520| 00 27 49 e8 00 27 b6 06 | 00 28 49 d5 00 28 99 4c |.'I..'..|.(I..(.L|
|00005530| 00 28 b7 e5 00 29 03 fd | 00 2a 14 0f 00 2a 25 37 |.(...)..|.*...*%7|
|00005540| 00 2a fe 15 00 2b 10 d8 | 00 2b 49 3f 00 2b 5d f4 |.*...+..|.+I?.+].|
|00005550| 00 2b 93 94 00 2d 6d 7d | 00 2d a6 09 00 8f 91 71 |.+...-m}|.-.....q|
|00005560| 00 ae 16 e3 00 2d b7 31 | 00 2e 5e ee 00 2e 6e 07 |.....-.1|..^...n.|
|00005570| 00 2e b8 31 00 31 8c 46 | 00 32 5c cc 00 32 81 08 |...1.1.F|.2\..2..|
|00005580| 00 22 55 eb 00 32 d1 e5 | 00 33 6c e7 00 33 7d 88 |."U..2..|.3l..3}.|
|00005590| 00 0d 55 7e 00 34 56 20 | 00 1d 07 5a 00 34 a3 66 |..U~.4V |...Z.4.f|
|000055a0| 00 34 b4 18 00 34 c6 dc | 00 90 7a 7c 00 34 f2 ff |.4...4..|..z|.4..|
|000055b0| 00 35 09 3a 00 35 1a 04 | 00 35 31 52 00 35 46 8b |.5.:.5..|.51R.5F.|
|000055c0| 00 0a 06 78 00 35 58 80 | 00 35 af a3 01 06 21 15 |...x.5X.|.5....!.|
|000055d0| 00 36 21 d3 00 36 63 ec | 00 15 45 5e 00 65 b8 ea |.6!..6c.|..E^.e..|
|000055e0| 00 37 6c 2a 00 38 3d 0e | 00 42 c8 17 00 0a 25 a1 |.7l*.8=.|.B....%.|
|000055f0| 00 0c 18 a5 00 12 02 71 | 00 38 99 11 00 39 47 c7 |.......q|.8...9G.|
|00005600| 00 3b 1e 65 00 3c 33 3c | 00 21 b2 7f 00 3c 59 e9 |.;.e.<3<|.!...<Y.|
|00005610| 00 3c f5 c8 00 3d 0b 77 | 00 3e a2 6b 01 10 ff db |.<...=.w|.>.k....|
|00005620| 00 40 59 cd 00 40 b6 61 | 00 41 9c e1 00 42 25 46 |.@Y..@.a|.A...B%F|
|00005630| 00 42 0f 61 00 42 6b 72 | 00 27 0d 16 00 44 15 6c |.B.a.Bkr|.'...D.l|
|00005640| 00 44 38 e5 00 45 a7 6a | 00 6f 6f f4 00 45 b8 d3 |.D8..E.j|.oo..E..|
|00005650| 00 45 cc 16 00 4a 18 20 | 00 47 d3 c8 00 4a f5 ad |.E...J. |.G...J..|
|00005660| 00 4b 9a 0c 00 4b df bd | 00 4f 21 27 00 51 70 06 |.K...K..|.O!'.Qp.|
|00005670| 00 51 80 73 00 51 90 29 | 00 51 a2 9c 00 51 f1 d4 |.Q.s.Q.)|.Q...Q..|
|00005680| 00 52 d4 f5 00 54 34 84 | 00 6f a8 fd 00 54 7a 11 |.R...T4.|.o...Tz.|
|00005690| 00 54 e7 50 00 55 18 b5 | 00 55 58 4d 00 55 8f 50 |.T.P.U..|.UXM.U.P|
|000056a0| 00 56 06 76 00 d6 df 34 | 00 56 33 96 00 56 53 d4 |.V.v...4|.V3..VS.|
|000056b0| 00 56 6b fd 00 56 bb 81 | 00 56 de 7f 00 57 55 8e |.Vk..V..|.V...WU.|
|000056c0| 00 58 18 dd 00 5a 83 fb | 00 6f f6 14 00 5e e9 5e |.X...Z..|.o...^.^|
|000056d0| 00 5f 05 a5 00 ef 04 07 | 00 60 c5 36 00 61 0c 33 |._......|.`.6.a.3|
|000056e0| 00 61 52 53 00 61 d9 89 | 00 61 fe bf 00 ef da fb |.aRS.a..|.a......|
|000056f0| 00 64 06 b8 00 64 3c c6 | 00 7c 7c 3f 00 ae 93 d9 |.d...d<.|.||?....|
|00005700| 00 66 ad 4c 00 66 c8 f4 | 00 70 50 f7 00 67 4a 49 |.f.L.f..|.pP..gJI|
|00005710| 00 67 d0 78 00 67 fe f6 | 00 6a 7b f6 00 6c 69 d3 |.g.x.g..|.j{..li.|
|00005720| 00 70 81 a2 00 70 c5 f1 | 00 92 90 c0 00 70 f8 a2 |.p...p..|.....p..|
|00005730| 00 71 56 73 01 11 02 b4 | 00 72 70 ce 00 72 8a 82 |.qVs....|.rp..r..|
|00005740| 00 73 7d 60 00 73 b1 ba | 00 73 e5 2e 00 74 3f 08 |.s}`.s..|.s...t?.|
|00005750| 00 74 4f f0 00 74 9e 9b | 00 75 4b 40 00 76 05 19 |.tO..t..|.uK@.v..|
|00005760| 00 77 3f c1 00 77 78 ca | 00 92 da 35 00 78 38 77 |.w?..wx.|...5.x8w|
|00005770| 00 78 c9 e7 00 7a 21 a2 | 00 7a 7f 70 00 87 47 67 |.x...z!.|.z.p..Gg|
|00005780| 00 7f e4 9a 00 7f f3 a2 | 00 80 a1 21 00 80 d4 3d |........|...!...=|
|00005790| 00 81 19 42 00 81 6f b6 | 00 81 be 62 00 83 9d 59 |...B..o.|...b...Y|
|000057a0| 00 83 b8 9d 00 91 2b c9 | 00 93 bb 6a 00 85 34 20 |......+.|...j..4 |
|000057b0| 00 85 6c 7c 00 85 d8 21 | 00 86 84 e0 00 a7 e7 b7 |..l|...!|........|
|000057c0| 00 89 96 6a 00 89 df 86 | 00 ae c8 64 00 97 b9 c8 |...j....|...d....|
|000057d0| 00 0d 79 d6 00 98 f3 08 | 00 98 c2 fe 00 02 d0 cc |..y.....|........|
|000057e0| 00 f1 a8 2e 00 16 ed 99 | 00 93 d8 f3 00 aa 31 9b |........|......1.|
|000057f0| 00 95 42 2b 00 95 80 ca | 00 02 d6 39 00 8c 3f c2 |..B+....|...9..?.|
|00005800| 00 98 32 aa 00 af 36 d4 | 00 be 23 f1 00 99 48 2d |..2...6.|..#...H-|
|00005810| 00 99 ee 05 00 9b a1 58 | 00 1f db d2 01 11 05 1c |.......X|........|
|00005820| 00 c5 9d d0 00 9b c4 f5 | 00 9f 0c 6b 00 9f 2d d6 |........|...k..-.|
|00005830| 00 9f bb 88 00 0e 26 90 | 00 c7 d8 75 00 c8 ba da |......&.|...u....|
|00005840| 00 c9 c8 aa 00 5d 27 63 | 00 ce d6 ec 00 cf d0 34 |.....]'c|.......4|
|00005850| 00 a1 ea 07 00 f3 1f a5 | 00 f3 f0 54 00 5f 1a 0b |........|...T._..|
|00005860| 00 f7 7f 18 00 16 f0 b4 | 00 62 54 40 00 a6 45 e5 |........|.bT@..E.|
|00005870| 00 1c c9 4e 00 b3 7d a7 | 00 a2 29 6d 00 a8 cc 33 |...N..}.|..)m...3|
|00005880| 00 a9 37 f3 00 a9 88 e5 | 00 03 16 69 00 83 d4 e4 |..7.....|...i....|
|00005890| 00 d1 60 ac 00 f7 bf c2 | 00 ab a3 0c 00 ac c8 02 |..`.....|........|
|000058a0| 00 ad 7c 3a 00 94 06 97 | 00 ad 0d b8 00 b0 4a fb |..|:....|......J.|
|000058b0| 00 b0 87 6a 00 b0 e1 c9 | 00 b1 36 bc 00 b1 6b d0 |...j....|..6...k.|
|000058c0| 00 b2 79 fc 00 b3 19 78 | 00 d3 40 e9 00 c1 e7 6d |..y....x|..@....m|
|000058d0| 00 03 56 a4 00 b8 a3 45 | 00 b5 36 37 00 dc 11 52 |..V....E|..67...R|
|000058e0| 00 dc 47 7a 00 dc cd 2e | 00 b8 f4 1d 00 b9 78 28 |..Gz....|......x(|
|000058f0| 00 ba 37 67 00 ba ea 09 | 00 bd d5 32 00 dd 8e 07 |..7g....|...2....|
|00005900| 00 bf 67 eb 00 bf d3 30 | 00 de a2 d2 00 c5 e3 f5 |..g....0|........|
|00005910| 00 c2 43 14 00 c2 f3 78 | 00 03 96 3d 00 c7 1e 6d |..C....x|...=...m|
|00005920| 00 1c c6 d1 00 13 79 1d | 00 3e ef a0 00 ca 20 3d |......y.|.>.... =|
|00005930| 00 cb 95 23 00 ce 78 72 | 00 56 17 c8 00 71 75 b7 |...#..xr|.V...qu.|
|00005940| 00 96 6c 5a 00 a3 89 8e | 00 b6 a7 8d 00 d0 2e f5 |..lZ....|........|
|00005950| 00 df 7e d7 00 df c8 dd | 00 e0 ff fa 00 e1 66 75 |..~.....|......fu|
|00005960| 00 e3 cc 64 00 e5 86 db | 00 e6 88 81 00 03 d6 cd |...d....|........|
|00005970| 00 04 16 4b 00 04 56 16 | 00 04 96 cc 00 f8 0b fd |...K..V.|........|
|00005980| 00 0f 33 d5 00 04 d6 bb | 00 11 af ba 00 05 16 0e |..3.....|........|
|00005990| 00 da 66 12 00 f8 9d 3d | 00 fc 37 bf 00 ff 54 f6 |..f....=|..7...T.|
|000059a0| 01 02 71 eb 01 03 a5 ae | 01 03 f8 56 01 05 a9 a0 |..q.....|...V....|
|000059b0| 01 09 7b 01 01 09 e6 6e | 01 0a cb fb 01 0c 74 e4 |..{....n|......t.|
|000059c0| 00 05 56 fd 01 0d 61 f3 | 01 0d fc 89 01 0e 27 49 |..V...a.|......'I|
|000059d0| 01 0e 65 2f 01 0f d6 25 | 00 00 00 00 00 00 00 00 |..e/...%|........|
|000059e0| 00 05 96 43 00 05 d6 9f | 00 06 16 09 00 06 56 0c |...C....|......V.|
|000059f0| 00 06 96 a4 00 06 d6 e1 | 00 07 16 ec 00 07 56 21 |........|......V!|
|00005a00| 00 07 96 60 00 07 d6 69 | 00 00 00 00 00 00 00 00 |...`...i|........|
|00005a10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005a20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005a30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005a40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005a80| 00 00 00 c0 4c 49 53 54 | 00 00 d7 cc 00 00 00 00 |....LIST|........|
|00005a90| 00 00 00 15 00 00 08 00 | 00 00 01 35 00 84 00 02 |........|...5....|
|00005aa0| 00 20 00 04 d0 14 26 92 | 00 00 01 35 00 00 00 00 |. ....&.|...5....|
|00005ab0| 00 00 de 39 00 0f 00 01 | 02 69 00 0f 00 01 14 a4 |...9....|.i......|
|00005ac0| 00 0f 00 01 26 3d 00 0f | 00 01 3b cd 00 0f 00 01 |....&=..|..;.....|
|00005ad0| 3c 4b 00 0f 00 01 3d 16 | 00 0f 00 01 3e cc 00 0f |<K....=.|....>...|
|00005ae0| 00 01 41 bb 00 0f 00 01 | 43 0e 00 0f 00 01 50 fd |..A.....|C.....P.|
|00005af0| 00 0f 00 01 58 43 00 0f | 00 01 59 9f 00 0f 00 01 |....XC..|..Y.....|
|00005b00| 5a 09 00 0f 00 01 5b 0c | 00 0f 00 01 5c a4 00 0f |Z.....[.|....\...|
|00005b10| 00 01 5d e1 00 0f 00 01 | 5e ec 00 0f 00 01 5f 21 |..].....|^....._!|
|00005b20| 00 0f 00 01 60 60 00 0f | 00 01 61 69 00 09 00 00 |....``..|..ai....|
|00005b30| 00 00 6e 20 74 6f 20 65 | 76 65 72 79 20 73 63 72 |..n to e|very scr|
|00005b40| 00 00 08 00 50 41 47 45 | 00 00 de 39 00 00 00 00 |....PAGE|...9....|
|00005b50| 00 00 d7 cc 10 33 34 3b | 00 00 d4 d6 e0 00 00 00 |.....34;|........|
|00005b60| 02 02 00 04 00 08 80 00 | 00 04 00 00 00 02 10 00 |........|........|
|00005b70| 40 01 80 00 05 00 20 00 | 80 50 01 04 00 00 00 80 |@..... .|.P......|
|00005b80| 00 10 00 08 40 04 00 02 | 00 00 00 12 00 00 04 00 |....@...|........|
|00005b90| 00 00 00 00 00 00 00 08 | 80 02 04 04 80 00 18 00 |........|........|
|00005ba0| 20 02 40 11 28 20 00 00 | 08 00 20 00 10 00 00 10 | .@.( ..|.. .....|
|00005bb0| 00 82 01 00 04 02 00 00 | 00 10 00 00 00 14 00 00 |........|........|
|00005bc0| 00 00 00 00 01 00 00 82 | 00 22 40 20 00 01 00 00 |........|."@ ....|
|00005bd0| 10 00 00 00 00 00 00 28 | 00 40 08 00 00 01 40 d5 |.......(|.@....@.|
|00005be0| a0 00 00 00 00 0a 00 00 | 08 08 08 00 20 00 14 00 |........|.... ...|
|00005bf0| 40 00 00 08 40 00 84 20 | c0 80 01 00 21 09 00 88 |@...@.. |....!...|
|00005c00| 08 10 02 08 00 00 88 00 | 02 10 20 08 00 04 04 00 |........|.. .....|
|00005c10| 00 00 00 01 00 00 00 00 | 00 00 00 00 48 40 00 00 |........|....H@..|
|00005c20| 03 00 08 18 00 48 00 02 | 08 31 0d 04 00 db 00 00 |.....H..|.1......|
|00005c30| 04 40 00 10 10 a0 01 80 | 00 00 40 10 54 08 00 00 |.@......|..@.T...|
|00005c40| 04 00 01 80 00 00 00 02 | 02 00 90 00 00 20 00 00 |........|..... ..|
|00005c50| 00 04 04 00 20 08 10 08 | 00 00 00 10 00 80 10 00 |.... ...|........|
|00005c60| 00 00 5d 71 e0 7f ff ff | ff ff ff ff ff ff ff ff |..]q....|........|
|00005c70| ff 7f ff f7 ff ff bf ff | ff ff ff ff ff ff ff ff |........|........|
|00005c80| ff ff ff ff ff ff ff fb | ff ff ef ff ff ff ff ff |........|........|
|00005c90| ff bf ff ff ff ff ff f7 | ff ff 7f ff ef ff ff ff |........|........|
|00005ca0| ff ff ff ff bf ff ff ef | ff ff ff ff ff ff ff ff |........|........|
|00005cb0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005cc0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff fe ff |........|........|
|00005cd0| ff ff ff fd ff fd ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005ce0| df ff ff fc 00 01 29 1d | a0 7f ff ff ff ff ff ff |......).|........|
|00005cf0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005d00| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005d10| ff ff ff ff ff bf ff ff | ff ff ff f7 ff ff ff ff |........|........|
|00005d20| ff ff ff ff ff ff ff ff | bf ff ff ff ff ff ff ff |........|........|
|00005d30| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005d40| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005d50| ff ff ff ff ff ff ff fd | ff ff ff ff ff ff ff ff |........|........|
|00005d60| ff ff ff ff ff ff ff fc | 00 00 56 5e a0 7f ff ff |........|..V^....|
|00005d70| ff ff ff ff ff ff ff ff | ff 7f ff ff ff ff ff ff |........|........|
|00005d80| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff fe ff |........|........|
|00005d90| ff ff ff ff ff ff ff ff | ff bf ff ff ff ff ff f7 |........|........|
|00005da0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005db0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005dc0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005dd0| ff ff ff ff ff ff ff ff | ff ff ff fd ff ff ff ff |........|........|
|00005de0| ff ff ff ff ff ff ff ff | ff ff ff fc 00 00 f9 b4 |........|........|
|00005df0| a0 7f ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005e00| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005e10| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005e20| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005e30| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005e40| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005e50| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005e60| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff fc |........|........|
|00005e70| 00 00 fc 4e 60 00 96 ad | df 12 88 58 58 3b 8f 51 |...N`...|...XX;.Q|
|00005e80| 39 49 4e 89 ec 3a 86 5d | 64 25 eb 32 59 f4 2f 77 |9IN..:.]|d%.2Y./w|
|00005e90| ed cf 07 1c 3f ef 26 8b | 2e b0 62 b5 cf d8 4a ab |....?.&.|..b...J.|
|00005ea0| fe ef d6 e8 ac 2d ae 1a | 8b d1 39 1f 77 26 28 c5 |.....-..|..9.w&(.|
|00005eb0| af 5f d6 f1 82 a6 4f 62 | fd 76 e4 fb e6 c3 cf 52 |._....Ob|.v.....R|
|00005ec0| 65 79 95 05 8b 6b c6 b4 | 0c b7 47 c7 db 14 c2 f6 |ey...k..|..G.....|
|00005ed0| db e9 3e c0 28 74 ac e8 | a1 bf 8c 61 03 18 eb 8b |..>.(t..|...a....|
|00005ee0| df 33 cd 76 88 71 54 7b | bb cb 36 42 32 a0 a0 6b |.3.v.qT{|..6B2..k|
|00005ef0| 4a f7 86 10 00 00 46 5a | a0 64 04 90 88 01 00 41 |J.....FZ|.d.....A|
|00005f00| 60 42 01 00 01 22 a1 81 | 01 02 10 20 14 82 01 12 |`B..."..|... ....|
|00005f10| 50 22 80 04 a8 e1 24 04 | 0b 8c 08 41 20 00 00 44 |P"....$.|...A ..D|
|00005f20| 8a 40 0e 87 ca 2b c0 10 | 82 08 94 02 00 00 50 00 |.@...+..|......P.|
|00005f30| 44 35 00 1d 09 11 41 14 | 44 80 80 49 68 74 a8 13 |D5....A.|D..Iht..|
|00005f40| 00 0c 01 01 51 88 00 ca | 02 08 01 28 80 20 03 94 |....Q...|...(. ..|
|00005f50| 61 10 42 13 40 4a 48 04 | 00 04 68 91 60 06 01 44 |a.B.@JH.|..h.`..D|
|00005f60| 00 10 e0 08 82 20 02 00 | 04 40 00 7a 80 18 50 00 |..... ..|.@.z..P.|
|00005f70| 00 00 00 58 70 98 18 00 | 00 00 0d 1d a0 7f f5 bf |...Xp...|........|
|00005f80| ff ff ff 7f 6f bf 9f ff | fd ff fd b7 ef 7e 1f ff |....o...|.....~..|
|00005f90| ff ef ff ff d7 6b 7f ff | ff fd ff bf ff bf ee ff |.....k..|........|
|00005fa0| fe ff ef ff ef ff ff ff | f6 ee dd fb ff ff de ff |........|........|
|00005fb0| 7f fd ff ff ff 7e 59 7d | 7d ff fd fd ff f7 ff ff |.....~Y}|}.......|
|00005fc0| ff 7f ff f7 ff e5 ff ff | f7 ff ff df ff ff df ff |........|........|
|00005fd0| f3 ff e7 de ff df ee bf | de ff fc e6 bd ff ff ff |........|........|
|00005fe0| eb ff ff 5f 77 ff fb 5b | df fe ff df ef 7e fe fb |..._w..[|.....~..|
|00005ff0| f9 fe fe ff f9 ff 97 7b | ff ff 1f 7c 00 00 0e f1 |.......{|...|....|
|00006000| a0 25 a4 a2 81 17 18 0d | 09 3a 05 10 6d 37 e5 61 |.%......|.:..m7.a|
|00006010| 2c 2f 19 71 44 28 6d 66 | d9 40 25 5c e9 69 1c 91 |,/.qD(mf|.@%\.i..|
|00006020| 8d 6f 0c 28 a8 92 ec 1c | ce 1e 5b af 86 0a c2 90 |.o.(....|..[.....|
|00006030| 92 d3 c6 17 96 24 39 b4 | 07 3c e8 4d f8 13 c6 36 |.....$9.|.<.M...6|
|00006040| ef 6c ec cb 31 f4 64 13 | 47 8e 7f 3a d5 8c 07 9b |.l..1.d.|G..:....|
|00006050| 8b 5a cd 79 80 bd c7 d5 | d0 1d 62 c7 5e 49 50 06 |.Z.y....|..b.^IP.|
|00006060| 25 1c f2 d9 24 57 a0 61 | b7 50 e0 42 42 94 4f 40 |%...$W.a|.P.BB.O@|
|00006070| 02 50 04 1b a0 48 66 40 | 00 04 14 18 dc 58 58 14 |.P...Hf@|.....XX.|
|00006080| 00 00 10 5a a0 14 ae 90 | 1d 0f b8 5e 5b 22 dd 93 |...Z....|...^["..|
|00006090| f5 7e fd 05 4d 77 5b 1c | ed 28 e1 32 c2 63 08 e7 |.~..Mw[.|.(.2.c..|
|000060a0| e9 e1 35 d0 6f 2f b6 eb | ed 95 cc 54 ae b7 7a 3f |..5.o/..|...T..z?|
|000060b0| ee 1f e6 d0 cb 62 ce 62 | b7 a4 38 7c e6 3d 08 45 |.....b.b|..8|.=.E|
|000060c0| 29 51 cc f8 fb 0c f9 c5 | dd fe 7c b7 f7 6c 2d f0 |)Q......|..|..l-.|
|000060d0| 57 88 a5 d6 0a cf ff 3d | eb 46 2f f4 69 81 aa 15 |W......=|.F/.i...|
|000060e0| 5e f9 ec 96 ad 74 66 b5 | 66 be 25 71 df 05 88 82 |^....tf.|f.%q....|
|000060f0| 83 b2 6b 34 c7 5c 14 9a | b9 8f e4 1b 5a d5 ed 4d |..k4.\..|....Z..M|
|00006100| e7 fa 19 74 00 00 11 f8 | a0 14 21 a5 93 01 97 16 |...t....|..!.....|
|00006110| 4a 20 0a 96 b5 26 c1 10 | 48 3f 19 a9 8c 28 85 22 |J ...&..|H?...(."|
|00006120| 72 72 06 49 68 4d 2f e8 | 69 8d 9e 88 40 a3 ff c4 |rr.IhM/.|i...@...|
|00006130| aa c4 5a ee ce 06 ee 5b | 90 41 8c 10 b3 a0 73 d0 |..Z....[|.A....s.|
|00006140| 41 32 28 0c 18 33 c4 5d | 42 74 c8 41 fd fc 44 13 |A2(..3.]|Bt.A..D.|
|00006150| ae 04 0f e1 d1 ac a4 96 | 43 8d a7 30 ab 35 4f 24 |........|C..0.5O$|
|00006160| d4 99 b0 a7 40 fa da e6 | 81 34 f0 89 64 86 a4 75 |....@...|.4..d..u|
|00006170| 4e 50 80 0b 90 88 6f 58 | 8c 4c 32 78 9b 9c 57 8a |NP....oX|.L2x..W.|
|00006180| 4c 15 09 09 73 38 29 40 | 00 00 12 cb a0 15 cc 8c |L...s8)@|........|
|00006190| 81 33 0d 6b 69 28 01 14 | e9 27 8d 80 42 22 15 1c |.3.ki(..|.'..B"..|
|000061a0| 6c 68 87 aa da 73 05 f9 | fb e9 77 5c 9d ad 86 08 |lh...s..|..w\....|
|000061b0| 92 04 cc cd 8f 59 4b ac | ee 82 cc 90 88 77 0e 34 |.....YK.|.....w.4|
|000061c0| 22 00 f0 10 64 7c 29 1f | 48 09 54 56 c4 64 eb 6b |"...d|).|H.TV.d.k|
|000061d0| f1 77 10 c3 af 89 4d 58 | 5d 98 b7 9b 0b 4e 85 bc |.w....MX|]....N..|
|000061e0| a2 3b ee 9a e0 10 40 d6 | 54 fc 18 04 a8 55 4f ac |.;....@.|T....UO.|
|000061f0| 22 4e e4 48 c2 10 90 08 | 20 14 61 08 8c 04 a4 19 |"N.H....| .a.....|
|00006200| a9 4a d5 02 0b 03 35 59 | 6c 98 5d 18 00 00 13 56 |.J....5Y|l.]....V|
|00006210| a0 7d 8b bb 6f 5f d9 f4 | c6 3e 8d 9f ff 7e 7d 16 |.}..o_..|.>...~}.|
|00006220| cf 73 9d bf fe 7f e3 bf | d3 f9 2c 77 fb cf 7d dc |.s......|..,w..}.|
|00006230| ef ff ae fa fc 5d ff d7 | e7 fe ff bf ef 8e de fb |.....]..|........|
|00006240| bc 43 d6 51 3f 54 ff 7d | ef b7 39 df 98 7e ce ff |.C.Q?T.}|..9..~..|
|00006250| fb 5c fd eb fd ff 50 f7 | ff ff df 47 bf f8 37 96 |.\....P.|...G..7.|
|00006260| ee cf d7 7f fc fd 77 c7 | fc fc f6 ff 5e fe e0 b9 |......w.|....^...|
|00006270| ad fc f3 bc e6 ec e5 79 | d7 f9 d3 fb d9 5e ff 67 |.......y|.....^.g|
|00006280| ee 55 fc fd f9 db f7 72 | 5b c4 e1 7f 9f fe 5f fc |.U.....r|[....._.|
|00006290| 00 00 14 04 a0 04 02 00 | 00 01 80 55 20 00 a0 00 |........|...U ...|
|000062a0| 01 26 81 00 82 1a 10 00 | 04 03 01 48 83 21 02 00 |.&......|...H.!..|
|000062b0| c0 40 00 74 48 8a 0a 80 | c0 10 48 10 0a 40 02 c0 |.@.tH...|..H..@..|
|000062c0| c0 0a 84 00 00 00 40 00 | 00 00 50 00 20 20 00 14 |......@.|..P.  ..|
|000062d0| 00 00 04 18 06 20 40 09 | 00 76 42 56 00 88 d1 00 |..... @.|.vBV....|
|000062e0| 01 88 04 82 08 09 01 18 | 80 20 03 90 60 00 00 10 |........|. ..`...|
|000062f0| c4 42 00 04 20 14 58 80 | 22 04 00 04 40 00 80 08 |.B.. .X.|"...@...|
|00006300| 00 04 02 80 04 00 00 5a | 00 48 10 08 01 04 00 28 |.......Z|.H.....(|
|00006310| 60 d9 00 08 00 00 00 00 | 00 00 00 00 00 00 00 00 |`.......|........|
|00006320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006340| 00 00 08 00 50 41 47 45 | 00 01 02 69 00 00 00 00 |....PAGE|...i....|
|00006350| 00 00 d7 cc 7a e9 bc 2f | 00 00 e6 d2 a0 15 fe eb |....z../|........|
|00006360| cd 72 bb 5d 5b 7b 09 1a | a7 57 dd 1b cf 3f 37 0e |.r.][{..|.W...?7.|
|00006370| df e6 ff ef fb 66 3f ff | ff 6f 7f d9 5f ef 96 8f |.....f?.|.o.._...|
|00006380| aa a6 cf 34 cf ff 78 fd | f7 de cc d4 cc 72 ee 36 |...4..x.|.....r.6|
|00006390| 36 64 de 35 6d b6 9c 5f | df db f6 55 b7 7f f4 d7 |6d.5m.._|...U....|
|000063a0| f7 7e ce b7 85 ef df 7f | 15 b8 27 bc 42 5f 9f fe |.~......|..'.B_..|
|000063b0| a1 7d 3b dc e6 fd d2 ff | f6 fd 4c e6 ad 7c fb f8 |.};.....|..L..|..|
|000063c0| 6e fc e5 d9 47 78 f8 18 | db 4e cd d3 ac f6 74 7f |n...Gx..|.N....t.|
|000063d0| 79 dd 54 4e e8 c6 b9 6e | fb df 1f dc 00 00 15 f6 |y.TN...n|........|
|000063e0| a0 15 25 19 17 bb fd 5e | 6b 20 df 1f 7f ee 5f 3e |..%....^|k ...._>|
|000063f0| ff f7 79 6b 6c ef 2d ee | fc ed 2f cf eb f9 ff 4c |..ykl.-.|../....L|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.